返回列表 上一主題 發帖

[發問] 請問工作表要如何不被取消隱藏!!謝謝

[發問] 請問工作表要如何不被取消隱藏!!謝謝

0118.JPG
2018-1-18 14:46
yvonne

這裡是程式區喔!!!

TOP

回復 1# afu9240
假設不想被隱藏的工作表名稱是:工作表2
請將底下巨集放在 ThisWorkbook 模組內

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    If Sh.Name = "工作表2" Then Sh.Visible = -1
End Sub

TOP

回復 3# Kubi

樓主的題意應是被隱藏的工作表不想被取消隱藏
  1. Sub Ex()
  2.     Sheets("工作表2").Visible = 2
  3. End Sub
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 4# GBKEE


    謝謝各位高手協助
yvonne

TOP

回復 4# GBKEE

抱歉!看起來是真的會錯意了。

TOP

        靜思自在 : 人要知福、惜福、再造福。
返回列表 上一主題