Hướng dẫn này sẽ trình bày cách sử dụng VBA để chèn hàng và cột trong Excel.
Để chèn hàng hoặc cột, chúng tôi sẽ sử dụng Chèn phương pháp.
Chèn một hàng hoặc một cột
Chèn hàng mới
Để chèn một hàng, bạn có thể sử dụng Đối tượng Hàng:
| 1 | Hàng (4). Chèn |
Hoặc bạn có thể sử dụng Đối tượng Phạm vi cùng với EntireRow:
| 1 | Phạm vi ("b4"). EntireRow.Insert |
Chèn cột mới
Tương tự như việc chèn hàng, chúng ta có thể sử dụng Đối tượng Cột để chèn một cột:
| 1 | Các cột (4). Chèn |
Hoặc Đối tượng Phạm vi, cùng với EntireColumn:
| 1 | Phạm vi ("b4"). EntireColumn.Insert |
Chèn nhiều hàng hoặc cột
Chèn nhiều hàng
Khi chèn nhiều hàng với Đối tượng Hàng, bạn phải nhập các hàng trong dấu ngoặc kép:
| 1 | Hàng ("4: 6"). Chèn |
Chèn nhiều hàng với Đối tượng Phạm vi hoạt động giống như với một hàng:
| 1 | Phạm vi ("b4: b6"). EntireRow.Insert |
Chèn nhiều cột
Khi chèn nhiều cột với Đối tượng Cột, hãy nhập cột bức thư trong trích dẫn:
| 1 | Các cột ("B: D"). Chèn |
Chèn nhiều cột với Đối tượng Phạm vi hoạt động giống như với một cột duy nhất:
| 1 | Phạm vi ("b4: d4"). EntireColumn.Insert |
Chèn - Shift & CopyOrigin
Các Chèn phương pháp có hai đối số tùy chọn:
- Sự thay đổi - Chuyển các ô theo hướng nào
- CopyOrigin - Định dạng ô nào để sao chép (trên, dưới, trái hoặc phải)
Đối số Shift không liên quan khi chèn toàn bộ hàng hoặc cột. Nó chỉ cho phép bạn chỉ ra để chuyển xuống hoặc chuyển sang phải:
- xlShiftDown - Chuyển các ô xuống dưới
- xlShiftToRight - Chuyển ô sang phải
Như bạn có thể thấy, bạn không thể di chuyển lên hoặc sang phải.
Các CopyOrigin đối số có hai đầu vào tiềm năng:
- xlFormatFromLeftorAbove - (0) Các ô mới được chèn có định dạng từ các ô bên trên hoặc bên trái
- xlFormatFromRightorBelow (1) Các ô mới được chèn sẽ có định dạng từ các ô bên dưới hoặc bên phải.
Hãy xem một số ví dụ về CopyOrigin tranh luận. Đây là dữ liệu ban đầu của chúng tôi:
Ví dụ này sẽ chèn một hàng, lấy định dạng từ hàng trên.
| 1 | Hàng (5) .Insert, xlFormatFromLeftOrAbove |
Ví dụ này sẽ chèn một hàng, lấy định dạng từ hàng bên dưới.
| 1 | Hàng (5) .Insert, xlFormatFromRightOrBelow |
Các ví dụ chèn khác
Chèn hàng hoặc cột đã sao chép
Nếu bạn muốn chèn một hàng đã sao chép, bạn sẽ sử dụng mã như sau:
| 12 | Phạm vi ("1: 1"). Sao chépPhạm vi ("5: 5"). Chèn |
Ở đây chúng tôi sao chép Hàng 1 và Chèn nó vào Hàng 5.
Chèn hàng dựa trên giá trị ô
Thao tác này sẽ lặp qua một dải ô, chèn các hàng dựa trên các giá trị ô:
| 1234567891011 | Sub InsertRowswithSpecificValue ()Làm mờ ô dưới dạng phạm viĐối với mỗi ô trong phạm vi ("b2: b20")If cell.Value = "insert" Thencell.EntireRow.InsertKết thúc nếuÔ tiếp theoKết thúc Sub |
Xóa hàng hoặc cột
Để xóa các hàng hoặc cột, chỉ cần sử dụng Xóa bỏ phương pháp.
| 1234567 | Hàng (1) .XóaPhạm vi ("a1"). EntireRow.DeleteCác cột (1) .XóaPhạm vi ("a1"). EntireColumn.Delete |
