Làm cách nào để tạo danh sách thả xuống với các siêu liên kết đến mọi trang tính trong Excel?
Có thể bạn đã tạo danh sách thả xuống trước đây, nhưng bạn đã bao giờ tạo danh sách thả xuống với các siêu liên kết đến mọi trang tính trong Excel như hình minh họa bên dưới chưa?
Tạo danh sách thả xuống với các siêu liên kết trang tính
Tạo danh sách các trang tính với siêu liên kết
Tạo danh sách thả xuống với siêu liên kết trang tính
Chỉ có một mã VBA có thể xử lý công việc trong Excel.
1. nhấp chuột Nhà phát triển > Chèn > Hộp tổ hợp (Điều khiển ActiveX).
Lưu ý: Nếu tab nhà phát triển không được hiển thị trong Ruy-băng, vui lòng nhấp vào Tập tin > Các lựa chọn > Tuy Biên ruy-băng, và sau đó kiểm tra Nhà phát triển trong hộp bên phải. Xem ảnh chụp màn hình:
2. Sau đó vẽ Hộp kết hợp ở bất kỳ đâu bạn thích.
3. Nhấp chuột phải vào trang tính mà bạn đã vẽ Hộp tổ hợp vừa rồi và nhấp vào Mã Chế độ xem từ trình đơn ngữ cảnh.
4. Sao chép và dán đoạn mã dưới đây vào tập lệnh trống, sau đó lưu nó để quay lại trang tính.
VBA: Tạo danh sách thả xuống với các liên kết trang tính
Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
Me.ComboBox1.Style = fmStyleDropDownList
If Me.ComboBox1.ListCount <> Sheets.Count Then
Me.ComboBox1.Clear
For I = 1 To ActiveWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
End If
Me.ComboBox1.DropDown
End Sub
5. nhấp chuột Nhà phát triển > Chế độ thiết kế để thoát khỏi chế độ thiết kế.
Bây giờ tất cả các trang tính đã được liệt kê trong danh sách thả xuống và nó sẽ chuyển đến trang tính khi bạn nhấp vào tên trang tính.
Tạo danh sách các trang tính với siêu liên kết
Nếu bạn chỉ muốn tạo danh sách các tên trang tính có thể nhấp được như hình minh họa bên dưới, bạn có thể đăng ký Kutools for Excel'S Create List of Sheet Names tính năng này có thể tạo danh sách siêu liên kết về tên trang tính hoặc danh sách các nút macro về tên trang tính.
Kutools cho Excel, với hơn 300 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn. |
Sau khi cài đặt Kutools cho Excel, vui lòng làm như sau:(Tải xuống miễn phí Kutools cho Excel ngay!)
1. nhấp chuột Kutools Plus > Bảng > Create List of Sheet Names.
2. bên trong Create List of Sheet Names , hãy làm như bên dưới:
(1). Kiểm tra Contains a list of hyperlinks< để tạo danh sách tên trang tính có thể nhấp hoặc kiểm tra Contains buttons and macros để tạo các nút liên kết đến từng trang tính.
(2). Đặt tên cho trang tính mới mà bạn sẽ đặt các siêu liên kết.
(3). Chỉ định vị trí của trang tính mới.
(4). Chỉ định các liên kết trang tính được hiển thị dưới dạng bao nhiêu cột.
3. nhấp vào Ok, bây giờ tên trang tính có thể nhấp đã được hiển thị trong trang tính mới.
Demo
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!