Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


73370 / 76732 ←次へ | 前へ→

【7838】Re:マクロを自動で有効とする方法。
回答  INA  - 03/9/19(金) 16:41 -

引用なし
パスワード
   もう要らないかもしれませんが、
マクロ無効にするとSheet1以外を非表示にするサンプルです。
(一度ブックを閉じて開いて下さい。)

Private Sub Workbook_BeforeClose(Cancel As Boolean)
  Dim i As Worksheet
  For Each i In Sheets
    If Not i.Name = "Sheet1" Then
      i.Visible = xlSheetVeryHidden
    End If
  Next i  
  Me.Save
End Sub

Private Sub Workbook_Open()
  Dim i As Worksheet
  For Each i In Me.Worksheets
    i.Visible = xlSheetVisible
  Next i
End Sub

1 hits

【7832】マクロを自動で有効とする方法。 yama 03/9/19(金) 13:54 質問
【7834】Re:マクロを自動で有効とする方法。 Jaka 03/9/19(金) 14:35 回答
【7835】Re:マクロを自動で有効とする方法。 Jaka 03/9/19(金) 14:41 回答
【7836】Re:マクロを自動で有効とする方法。 yama 03/9/19(金) 15:03 お礼
【7838】Re:マクロを自動で有効とする方法。 INA 03/9/19(金) 16:41 回答
【7840】Re:マクロを自動で有効とする方法。 yama 03/9/19(金) 19:52 お礼

73370 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free