Vba詞典隱藏行為

請使用以下代碼，在工作表標簽上單擊鼠標右鍵，從快捷菜單中選擇“查看代碼”，調出工作表的VBA模塊，然後粘貼以下代碼。

私有子工作表_ selection change（ByVal Target As Range）

如果目標。地址=“$ A $ 1“然後

如果目標。那麽value =“hide“

rows（“2:10“）entire row . hidden = True。

範圍（“a 1“）=“顯示2-10行“

出口接頭

如果…就會結束

如果目標。value =“Display 2-10 lines“然後

rows（“2:10“）entire row . hidden = False。

範圍（“a 1“）=“隱藏“

如果…就會結束

如果…就會結束

末端接頭