Cách bỏ ẩn trang tính 'Rất ẩn'


45

Tôi đã loay hoay trong các cài đặt trang tính và bằng cách nào đó quản lý để làm cho một trang tính 'rất ẩn', nhưng tôi dường như không thể làm cho nó hiển thị lại. Làm thế nào tôi có thể làm cho nó hiển thị?

Tôi đang sử dụng Excel 2010.

Câu trả lời:


41

Một lựa chọn là làm điều đó với VBA

Hãy thử dưới đây:

Sub UnHide()
Dim ws As Worksheet
For Each ws In Sheets
    ws.Visible = True
Next
End Sub

Điều này sẽ hiển thị TẤT CẢ các trang bị ẩn hoặc rất ẩn


5
Vâng, Very Hiddenchỉ có thể được mở ra với VBA.
BruceWayne

3
Không có đó là sai. Xem trả lời của tôi.
NiklasJ

9
@NiklasJ Mã không sai; điều này sẽ làm việc để đặt chúng hiển thị.
TylerH

8
@NiklasJ - mã này sẽ bỏ ẩn tất cả các trang tính trong một lần, phương thức của bạn sẽ bỏ ẩn một trang tính tại một thời điểm. Không phải là sai, cả hai đều đúng. Đây là phương pháp tôi đã chọn vì tôi thậm chí không biết phương pháp của bạn tồn tại! TIL!
FreeMan

11
@TylerH Tôi nghĩ rằng Nilklas đã đề cập đến tuyên bố ngầm rằng bạn phải sử dụng mã để bỏ ẩn các ô. Câu trả lời của ông không dựa vào mã.
jpaugh

60

Bạn làm như thế này:

  1. Mở trình soạn thảo VBA ( Alt+ F11)
  2. Mở VBAProject tương ứng với tệp của bạn.
  3. Mở thư mục "Microsoft Excel-object"
  4. Chọn Trang tính bạn đã ẩn.
  5. Đi đến các thuộc tính (nhấn F4)
  6. Thay đổi thuộc tính "Hiển thị" thành xlSheetVisible thay vì xlSheetVeryHidden

15

Trong trình soạn thảo VBA, đi đến thuộc tính trang tính và thay đổi thuộc tính bên dưới

nhập mô tả hình ảnh ở đây


3
đây là phương pháp tương tự như NiklasJ ở trên?

2
Tôi chỉ nhận thấy, có nó là như vậy nhưng với hình ảnh.
Scorpion99

Bạn nên chỉnh sửa câu trả lời của @ NiklasJ và thêm hình ảnh ...
Tôi nói Phục hồi lại

Tôi vô tình giấu tờ duy nhất trong sổ làm việc! Tôi đã thử ở trên, lưu bảng tính và cố gắng mở nó và nó (toàn bộ sổ làm việc) không hiển thị. Có ý kiến ​​gì không?
Mark Stewart

Hà! Tôi đã mở một bảng tính khác và đó là lý do tại sao tôi không thể nhìn thấy bất cứ điều gì. Tôi đã đóng tất cả các sổ làm việc Excel, sau đó mở nó, không có gì hiển thị nhưng thanh công cụ "Xem" đã bật tùy chọn bỏ ẩn!
Mark Stewart

1

Để giữ chúng ẩn, nhưng hiển thị trong menu tùy chọn (UnHide ..), sử dụng cùng một mã nhưng với điều này ..

Sub StillHide()
Dim ws As Worksheet
For Each ws In Sheets
    ws.Visible = xlSheetHidden  <-- change from Visible to this.
Next
End Sub

Bằng cách đó, các tab không đột nhiên hiển thị cho người dùng. Họ vẫn "giấu mặt".

Khi sử dụng trang web của chúng tôi, bạn xác nhận rằng bạn đã đọc và hiểu Chính sách cookieChính sách bảo mật của chúng tôi.
Licensed under cc by-sa 3.0 with attribution required.