ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   unhide hidden window or workbook (https://www.excelbanter.com/excel-worksheet-functions/8173-unhide-hidden-window-workbook.html)

mango

unhide hidden window or workbook
 
dear all,

first i unhide the window in a module A

MyPath2 = "\\server_app\budget\abc.xls#'bbb'!a1"
Set xlx = Workbooks.Open("\\server_app\budget\abc.xls", UpdateLinks:=0)
ActiveWorkbook.FollowHyperlink (MyPath2)
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1
ActiveWindow.Visible = False

later i want to unhide using macro shortcut key in module B
ActiveWindow.Visible = true

but it would work as i think it isn't a activewindow now. what should i use
to unhide or make this visible? i do this for presentation.
first of all i call out and hide it then when come to this topic i will
unhide it.
pls help.

thanks


Frank Kabel

Hi
use

dim wks as worksheet
'...
set wks=activesheet
'now use wks. e.g.
wks.visible=true

"mango" wrote:

dear all,

first i unhide the window in a module A

MyPath2 = "\\server_app\budget\abc.xls#'bbb'!a1"
Set xlx = Workbooks.Open("\\server_app\budget\abc.xls", UpdateLinks:=0)
ActiveWorkbook.FollowHyperlink (MyPath2)
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1
ActiveWindow.Visible = False

later i want to unhide using macro shortcut key in module B
ActiveWindow.Visible = true

but it would work as i think it isn't a activewindow now. what should i use
to unhide or make this visible? i do this for presentation.
first of all i call out and hide it then when come to this topic i will
unhide it.
pls help.

thanks



All times are GMT +1. The time now is 12:39 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com