Hide Another Workbook Worksheet

[Rahulwork]

Hello Everyone

In A1 i have a path d\temp\action.xlsm

Action.xlsm Workbook has a worksheet by the name of secret

Right now in current open active workbook.. name sample.xlsm. i have a button. I want if i click on that button action.xslm worksheet would be hide. In simple i want to hide secret worksheet from the excel file name mentioned in A1.

Pls help

 

[mumps]

Assign this macro to your button.
Sub HideSheet()
Application.ScreenUpdating = False
Dim wbOpen As Workbook
Set wbOpen = Workbooks.Open("D:\temp\action.xlsm")
Sheets("secret").Visible = False
Application.ScreenUpdating = True
End Sub

 

[Rahulwork]

Thanks for your response..

Instead of path i need range a1... ..

Kindly provide me updated code.. it would help me

 

[Fluff]

Maybe

Sub Rahulwork()
   Dim Wbk As Workbook
   
   Set Wbk = Workbooks.Open(Range("A1").Value)
   Wbk.Sheets("secret").Visible = False
End Sub

 

[Rahulwork]

thank you so much its working but by this code file mentioned in path is opening.

can we keep that close and save.

 

[Fluff]

To save & close use

Sub Rahulwork()
   Dim Wbk As Workbook
   
   Set Wbk = Workbooks.Open(Range("A1").Value)
   Wbk.Sheets("secret").Visible = False
   Wbk.Close True
End Sub

 

[Rahulwork]

Big thank u

 

[Fluff]

Glad we could help & thanks for the feedback