Trong hướng dẫn này, chúng ta sẽ xem cách chèn một hàng hoặc một cột bằng mã VBA trong Excel. Chúng ta cũng sẽ khám phá những cách khác nhau để viết macro cho việc này là gì Show Chèn một hàng bằng VBAĐể chèn một hàng bằng mã VBA, bạn cần sử dụng thuộc tính “Entire Row” với phương thức “Insert”. Với thuộc tính toàn bộ hàng, bạn có thể tham chiếu toàn bộ hàng bằng cách sử dụng một ô rồi chèn một hàng mới vào đó. Theo mặc định, nó sẽ chèn một hàng trước ô mà bạn đã đề cập
Mã của bạn đã sẵn sàng ở đây để chèn một hàng. Bây giờ khi bạn chạy mã này, nó sẽ ngay lập tức chèn một hàng mới trước ô A1 Liên kết hữu ích. Thẻ nhà phát triển. Trình soạn thảo Visual Basic. Chạy Macro. Sổ làm việc Macro cá nhân Chèn nhiều hàngCó hai cách để chèn nhiều hàng trong một bảng tính mà tôi đã tìm thấy. Đầu tiên là cùng một phương thức chèn mà chúng ta đã sử dụng trong ví dụ trên Với điều này, bạn cần chỉ định một phạm vi có số lượng tương đương với số lượng hàng bạn muốn chèn. Bây giờ, giả sử bạn muốn chèn 5 hàng sau, trong trường hợp đó, bạn có thể sử dụng mã như sau Thành thật mà nói, tôi không thấy phương pháp này hữu ích lắm vì bạn cần thay đổi phạm vi nếu bạn muốn thay đổi số lượng hàng Vì vậy, đây là phương pháp thứ hai Khi bạn chạy mã này, nó sẽ yêu cầu bạn nhập số hàng mà bạn muốn thêm và sau đó là số hàng mà bạn muốn thêm tất cả các hàng đó. Nó sử dụng FOR LOOP (For Next) để lặp lại số lần đó và chèn từng hàng một Chèn hàng dựa trên giá trị ôNếu bạn muốn chèn các hàng dựa trên giá trị ô, thì bạn có thể sử dụng đoạn mã sau Khi bạn chạy macro này, nó sẽ đếm số hàng từ ô A1 và hàng mà bạn muốn thêm hàng từ ô B1 Chèn một hàng mà không cần định dạngKhi bạn chèn một hàng mà hàng trên có một số định dạng cụ thể, trong trường hợp đó, hàng đó cũng sẽ tự động có định dạng đó. Và cách đơn giản nhất để giải quyết vấn đề này là sử dụng các định dạng rõ ràng. Hãy xem xét đoạn mã sau Khi bạn chạy đoạn mã trên, nó sẽ chèn một hàng mới trước hàng thứ 7. Bây giờ, điều gì sẽ xảy ra, khi bạn chèn một hàng trước hàng thứ 7, hàng mới đó sẽ trở thành hàng thứ 7 và sau đó dòng mã thứ hai sẽ xóa các định dạng khỏi hàng đó Chèn hàng đã sao chépBạn cũng có thể sử dụng phương pháp tương tự để sao chép một hàng rồi chèn nó vào một nơi khác. Xem đoạn mã sau Những người làm việc với tập dữ liệu lớn thường cần những thao tác đơn giản như chèn/xóa hàng, cột Mặc dù đã có nhiều cách khác nhau (và đơn giản) để thêm hàng trong Excel, nhưng khi chèn một hàng trống sau mỗi hàng khác (hoặc mỗi hàng thứ ba hoặc thứ tư), mọi thứ sẽ hơi phức tạp Hướng dẫn này bao gồm Chèn một hàng trống sau mỗi hàng khácTrong hướng dẫn này, tôi sẽ chỉ cho bạn một số cách thực sự đơn giản để chèn một hàng trống sau mỗi hàng trong tập dữ liệu hiện có (hoặc mỗi hàng thứ n) Vì không có cách nào trực tiếp để thêm hàng vào giữa các hàng nên phương pháp được đề cập trong bài viết này là giải pháp thay thế để thực hiện điều này. Và nếu bạn cảm thấy thoải mái với VBA, thì bạn có thể thực hiện việc này chỉ bằng một cú nhấp chuột Sử dụng cột trợ giúp và tính năng sắp xếpGiả sử bạn có một tập dữ liệu như hình bên dưới và bạn muốn chèn một khoảng trống giữa các hàng hiện có Dưới đây là các bước để chèn các hàng trống giữa các hàng hiện có
Bạn sẽ nhận thấy rằng ngay sau khi bạn nhấp vào OK trong hộp thoại Sắp xếp, nó sẽ ngay lập tức sắp xếp lại các hàng và bây giờ bạn có một hàng trống sau mỗi hàng trong tập dữ liệu của mình Trên thực tế, đây không hẳn là chèn một hàng trống. Phương pháp sắp xếp này chỉ đơn giản là sắp xếp lại dữ liệu bằng cách đặt các hàng trống từ bên dưới tập dữ liệu vào giữa các hàng trong tập dữ liệu Bạn cũng có thể mở rộng logic tương tự để chèn một hàng trống sau mỗi hai hàng hoặc cứ sau ba hàng Giả sử bạn có tập dữ liệu như hình bên dưới và bạn muốn lấy một hàng trống sau mỗi hai hàng Dưới đây là các bước để làm điều này
Tương tự, trong trường hợp bạn muốn chèn một hàng trống sau mỗi hàng thứ ba, hãy sử dụng các số 3, 6, 9, v.v. Sử dụng mã VBA đơn giảnMặc dù bạn cần rất nhiều cách giải quyết để chèn các hàng trống thay thế trong Excel, nhưng với VBA, tất cả chỉ là một miếng bánh Với mã VBA đơn giản, tất cả những gì bạn cần làm là chọn tập dữ liệu mà bạn muốn chèn một hàng trống vào sau mỗi hàng và chỉ cần chạy mã (chỉ cần một cú nhấp chuột) Dưới đây là mã VBA sẽ chèn một hàng trống sau mỗi hàng trong tập dữ liệu Sub InsertAlternateRows()
'This code will insert a row after every row in the selection
'This code has been created by Sumit Bansal from trumpexcel.com
Dim rng As Range
Dim CountRow As Integer
Dim i As Integer
Set rng = Selection
CountRow = rng.EntireRow.Count
For i = 1 To CountRow
ActiveCell.Offset(1, 0).EntireRow.Insert
ActiveCell.Offset(2, 0).Select
Next i
End SubĐoạn mã trên đếm tổng số hàng trong vùng chọn và sử dụng vòng lặp For Next để duyệt qua từng hàng và chèn một hàng trống sau mỗi hàng hiện có trong tập dữ liệu Dưới đây là các bước để đặt mã VBA này trong Trình chỉnh sửa VBA trong Excel
Khi bạn có mã trong Trình soạn thảo VB, bây giờ bạn có thể sử dụng mã này để chèn các hàng trống sau mỗi hàng khác trong tập dữ liệu Dưới đây là các bước sử dụng mã để chèn các hàng trống sau mỗi hàng
Đó là nó Các bước trên sẽ ngay lập tức chèn các hàng trống xen kẽ vào tập dữ liệu Có nhiều cách khác nhau để chạy macro trong Excel. Ví dụ: nếu bạn phải thực hiện việc này khá thường xuyên, bạn có thể thêm macro này vào Thanh công cụ truy cập nhanh để bạn có thể chạy nó chỉ bằng một cú nhấp chuột |
