Sub シートを表示または非表示にする()
    
    Worksheets("Sheet1").Visible = False '非表示にする

    Worksheets("Sheet1").Visible = True '表示する

End Sub