View Single Post
  #1   Report Post  
mango
 
Posts: n/a
Default make hidden window or workbook visible without specify the name

dear all,
it is for presentation.
may i know any other way to make my workbook visible without specify the
workbook name? because i have 10 workbooks need to do like this. i open each
workbook 1 at a time so no clash between. i am thinking of using same
shortcut key to make it visible without specify the workbook name

first i make it invisible. here of course i need to specify the workbook name.

MyPath2 = "\\server\temp\ctc.xls#'Debtors & Milestone highlights'!a1"
Set xlx = Workbooks.Open("\\servertemp\ctc.xls", UpdateLinks:=0)
ActiveWorkbook.FollowHyperlink (MyPath2)
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1
ActiveWindow.Visible = False

later when need it will use shortcut key to show. here can i make it visible
without specify the name so that i need not to create 10 different sub doing
the same task.
i want to use the same sub for 10 workbook so is there a way no need to
define the workbook here. any coding to make invisible window or workbook to
become visible without need to specify the name?


Sub make_visible()
Range("A1").Select
Windows("ctc.xls").Visible = True
End Sub