特定のシートを見せたくないんです
特定のシートを見せたくない時ってありませんか?
ついつい、再表示してみたくなります。
VBA上だと、エクセルシートから再表示できなくできるんです(見えなくするんです)
マジですか、是非とも知りたいです。
では、下記にコード記しますね♪
イメージ
↓ マクロ実行後、
右クリック上からも、再表示選択できなくなります。
非表示コード
Sub 特定のシート表示させない()
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = xlSheetVeryHidden
End Sub
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = xlSheetVeryHidden
End Sub
表示コード
Sub 特定のシート表示させる()
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = xlSheetVisible
End Sub
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = xlSheetVisible
End Sub
おまけ
通常パターンのエクセル上表示非表示方法はこんな感じです。
ありがとうございます!
Sub シート表示させない()
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = False
End Sub
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = False
End Sub
Sub シート表示させる()
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = True
End Sub
Dim sheetname
sheetname = "隠したいシート"
Worksheets(sheetname).Visible = True
End Sub