Cách tạo danh sách các bảng ẩn bằng VBA
Bạn có thể ẩn các trang tính của sổ làm việc bằng lệnh "Định dạng - Trang tính - Ẩn". Sau đó, vẫn có thể truy cập nội dung bảng bằng công thức, nhưng bảng không còn hiển thị nữa.
Nếu bạn cần danh sách tất cả các trang tính ẩn trong sổ làm việc đang hoạt động, bạn có thể sử dụng macro sau:
Danh sách phụHiddenTablesOn ()
Dim Table As Worksheet, NewTable As Worksheet
Làm mờ ứng dụng hiện tại dưới dạng sổ làm việc
Dim i As Integer
Đặt CurrentMappe = ActiveWorkbook
Đặt NeueTabelle = Workbooks.Add.Sheets (1)
Đối với mỗi bảng trong CurrentMappe.Worksheets
If Table.Vible = False Then
i = i + 1
NewTable.Cells (i, 1) .Value = Table.Name
Kết thúc nếu
Bàn tiếp theo
Kết thúc Sub
Macro lặp qua tất cả các trang tính và kiểm tra thuộc tính Dễ thấy. Nếu nó không được thỏa mãn, nó là một bảng tính ẩn. Sau đó, tên của trang tính được chuyển sang danh sách.
Macro liệt kê tên của tất cả các trang tính ẩn trong một bảng trong sổ làm việc mới.
Hình cho thấy kết quả của macro khi có ba trang tính ẩn trong sổ làm việc đang hoạt động: "Ẩn", "Ẩn" và "Ẩn".
Mẹo: Nếu bạn muốn biết cách nhập và bắt đầu macro trong Excel, bạn sẽ tìm thấy mô tả ngắn gọn ở đây:
www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie-makros-in-excel-ein.html
