EXCEL MACRO – Hide/Unhide Sheet

04/03/2016 § Leave a comment

Sub HideSheetPRIPREMA()

‘ HideSheetPRIPREMA Macro


Application.ScreenUpdating = False

If Not Worksheets(“PRIPREMA”).Visible Then
MsgBox “List je skriven!!!”
‘End If
Else
Sheets(“PRIPREMA”).Select
ActiveWindow.SelectedSheets.Visible = False
Sheets(“MENU”).Select
Range(“A1”).Select
Application.ScreenUpdating = True

End If
End Sub

 

=======
Sub UNHideSheetPRIPREMA()

‘ HideSheetPRIPREMA Macro


Application.ScreenUpdating = False
Sheets(“MENU”).Select
Sheets(“PRIPREMA”).Visible = True
Sheets(“MENU”).Select
Range(“A1”).Select
Sheets(“PRIPREMA”).Select
Range(“A30”).Select
Application.ScreenUpdating = True
End Sub

Advertisements

Tagged: ,

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

What’s this?

You are currently reading EXCEL MACRO – Hide/Unhide Sheet at RheXenoR.

meta

%d bloggers like this: