Với mã VBA sau, bạn có thể tạo danh sách từ các ô được chỉ định trên nhiều trang tính một cách dễ dàng. Bạn có thể làm như sau:

Bước 1: Chọn ô được chỉ định mà bạn sẽ tạo danh sách của mình. Trong trường hợp của chúng tôi, chúng tôi chọn Ô E6.

Bước 2: Nhấn Khác + F11 các phím đồng thời để mở cửa sổ Microsoft Visual Basic for Applications, bấm Chèn > Mô-đun, và sau đó dán mã sau vào cửa sổ mô-đun.

VBA: Tạo danh sách từ các ô giống nhau trên nhiều trang tính

Sub CreateList()
Dim xAddWs As Worksheet
Dim xWs As Worksheet
Dim RngAddress As String
xTitleId = "KutoolsforExcel"
RngAddress = Application.ActiveCell.Address
Set xAddWs = Application.ActiveWorkbook.Sheets.Add
xAddWs.Name = xTitleId
i = 1
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xTitleId Then
xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value
i = i + 1
End If
Next
End Sub

Bước 3: Nhấn F5 phím hoặc nhấp vào chạy để chạy VBA này.

Sau đó, tất cả các giá trị từ ô được chỉ định trên tất cả các trang tính được sao chép sang một trang tính mới có tên KutoolsforExcel. Xem ảnh chụp màn hình ：

VBA này sẽ điền danh sách vào một trang tính mới và các giá trị trong danh sách là tĩnh sẽ không thay đổi với các giá trị ban đầu.

Tuy nhiên, đôi khi bạn có thể muốn điền danh sách vào phạm vi được chỉ định và yêu cầu các giá trị danh sách luôn tương ứng với các giá trị ban đầu trong các ô được chỉ định mọi lúc. Để đáp ứng những nhu cầu này, bạn nên thử phương pháp sau.

Phương pháp này sẽ giới thiệu Kutools cho Excel'S Tham khảo động đến Trang tính tiện ích để tạo một danh sách động từ các ô giống nhau trên nhiều trang tính.

Bước 1: Chọn Phạm vi nơi bạn sẽ điền vào danh sách động và nhấp vào Kutools > Xem thêm > Tham khảo động đến Trang tính.

Bước 2: Trong hộp thoại mở Fill Worksheets References,

(1) Nhấp vào Điền đơn hàng và chọn một loại điền từ danh sách thả xuống. Trong trường hợp của chúng tôi, chúng tôi chọn Điền vào ô dọc sau ô;

(2) Trong Điền công thức , chỉ định địa chỉ ô mà bạn sẽ tạo danh sách động từ đó, sau đó bấm vào Khóa nút để khóa công thức.

(3) Nhấp vào Điền Phạm vi .

Bây giờ bạn sẽ thấy các giá trị trong các ô được chỉ định trên tất cả các trang tính được điền vào phạm vi được chỉ định như ảnh chụp màn hình bên dưới được hiển thị:

Khi các giá trị ban đầu thay đổi, các giá trị tương ứng trong danh sách được chỉ định này sẽ được thay đổi tự động.

Làm cách nào để tự động điền cùng một ô từ các trang tính khác nhau vào một trang tính trong Excel?