Tạo mục lục cho sổ làm việc bằng cách liệt kê tên của tất cả các trang tính trong sổ làm việc Excel
Bạn muốn nhận danh sách tất cả các trang tính trong một sổ làm việc? Sau đó, sử dụng macro VBA. Macro sau tạo một trang tính mới trong sổ làm việc đang hoạt động và liệt kê tên của tất cả các trang tính bên dưới trang tính kia trong trang tính này:
Danh sách phụBlaetter ()
Làm mờ dòng dưới dạng số nguyên
Làm mờ danh sách dưới dạng trang tính
Đặt danh sách = ActiveWorkbook.Worksheets.Add
Đối với dòng = 1 Đến ActiveWorkbook.Worksheets.Count
List.Cells (row, 1) .Value = Worksheets (row) .Name
Hàng tiếp theo
Kết thúc Sub
Sau khi bắt đầu, macro tạo danh sách các trang tính trong sổ làm việc đang hoạt động. Danh sách này nằm trong một trang tính mới. Hình sau cho thấy kết quả có thể trông như thế nào:
Để nhập macro, hãy nhấn tổ hợp phím ALT F11 trong Excel. Điều này sẽ gọi trình soạn thảo VBA. Sử dụng lệnh INSERT - MODULE để chèn một trang mô-đun trống. Để bắt đầu macro, hãy nhấn tổ hợp phím ALT F8 trong Excel.
