Bỏ qua nội dung chính

Làm thế nào để kiểm tra xem một trang tính có tồn tại trong một sổ làm việc không?

Khi bạn có hàng chục trang tính hoặc thậm chí hàng trăm trang tính trong một sổ làm việc và bạn muốn tìm hoặc kiểm tra xem một trang tính có tồn tại trong sổ làm việc này hay không, nói chung, đó có thể là một công việc lớn. Bây giờ tôi giới thiệu mã VBA và một công cụ tiện dụng để bạn nhanh chóng kiểm tra xem một trang tính có tồn tại trong sổ làm việc hay không.

Kiểm tra xem trang tính có tồn tại trong sổ làm việc với VBA không

Kiểm tra xem một trang tính có tồn tại hay không và chuyển sang trang tính đó bằng Kutools cho Excel ý kiến ​​hay3


Kiểm tra xem trang tính có tồn tại trong sổ làm việc không

Vui lòng làm theo các bước dưới đây để sao chép mã VBA và chạy nó để kiểm tra xem trang tính có tồn tại trong sổ làm việc hiện tại hay không.

1. nhấn Alt + F11 để hiển thị Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Trong cửa sổ, nhấp vào Chèn > Mô-đun để hiển thị một cửa sổ mô-đun mới, sau đó sao chép mã VBA sau vào cửa sổ mô-đun.

VBA: Kiểm tra xem trang tính có tồn tại trong sổ làm việc hay không.

Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
    If Application.ActiveWorkbook.Sheets(i).Name = pName Then
        IsExist = True
        Exit For
    End If
Next
CheckSheet = IsExist
End Function

3. Lưu mã này và quay lại trang tính và chọn một ô trống để nhập công thức này = CheckSheet (“Shee1”) (Sheet1 cho biết tên trang tính bạn muốn kiểm tra xem nó có tồn tại hay không) vào đó, nhấn đăng ký hạng mục thi nút, KHÔNG ĐÚNG cho biết trang tính này không tồn tại, và TURE cho biết nó tồn tại trong sổ làm việc hiện tại.


Kiểm tra xem một trang tính có tồn tại hay không và chuyển sang trang tính đó bằng Kutools cho Excel với VBA

Với Hàm xác định ở trên, bạn chỉ có thể kiểm tra xem một trang tính có tồn tại hay không và việc này cũng hơi khó. Tuy nhiên, với Kutools cho Excel, ngăn Điều hướng liệt kê tất cả tên trang tính cho bạn, hỗ trợ cuộn để tìm trang tính hoặc lọc tên trang tính để tìm trang tính và nếu cần, bạn có thể nhấp vào tên trang tính để nhanh chóng chuyển sang trang tính sau khi tìm.

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 cài đặt miễn phí Kutools cho Excel, vui lòng làm như sau:

1. kích hoạt sổ làm việc bạn muốn kiểm tra tên trang tính nếu có, sau đó bấm Kutools > THÔNG TIN. Xem ảnh chụp màn hình
:doc kiểm tra xem một trang tính có tồn tại không 1

2. Sau đó trong ngăn bật lên, hãy nhấp vào Workbook & Sheet để mở rộng ngăn, bạn có thể xem tất cả danh sách tên trang tính trong ngăn, bạn có thể cuộn để tìm tên trang tính.
ngăn điều hướng doc kutools 2

3. Hoặc bạn có thể kiểm tra Lọc , sau đó gõ các từ khóa của tên trang tính mà bạn muốn kiểm tra, sau đó tên trang tính được chỉ định sẽ được liệt kê, nhấp vào tên trang tính, sau đó chuyển sang trang tính.
ngăn điều hướng doc kutools 3

Công cụ năng suất văn phòng tốt nhất

Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

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 kte 201905


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!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In the VBA code, if option explicit is set, then the variable "i" will need to be defined
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations