Hide Workbook
I would like to write code that will hide a specific workbook when a userform
pops up. I tried: Application.Visible = False That works fine except, it hides Excel completely. I would like to hide only the workbook that contains the userform. |
Hide Workbook
The workbook that contains the userform?
dim myWindow as window for each mywindow in thisworkbook.windows mywindow.visible = false next mywindow Change thisworkbook.windows to activeworkbook.windows if you want the activeworkbook's windows hidden. === If there's only one window for that workbook: thisworkbook.windows(1).visible = false aftamath77 wrote: I would like to write code that will hide a specific workbook when a userform pops up. I tried: Application.Visible = False That works fine except, it hides Excel completely. I would like to hide only the workbook that contains the userform. -- Dave Peterson |
Hide Workbook
Worksheets("Sheet1").Visible = False
Bear in mind that Excel must have at least one worksheet visible. Another alternative might be to reduce the window size so it is hidden behind the userform. Assuming the code is in the active worksheet: With ActiveWindow .WindowState = xlNormal .Top = 100 .Left = 250 .Height = 100 .Width = 100 End With UserForm1.Show -- Ian -- "aftamath77" wrote in message ... I would like to write code that will hide a specific workbook when a userform pops up. I tried: Application.Visible = False That works fine except, it hides Excel completely. I would like to hide only the workbook that contains the userform. |
Hide Workbook
Try this from another workbook
Workbooks("WkbNameHere").window(1).hidden = True or Windows("WkbNameHere.xls").Visible = False -- To get my email id paste my address in an Excel cell and press Enter... "aftamath77" wrote: I would like to write code that will hide a specific workbook when a userform pops up. I tried: Application.Visible = False That works fine except, it hides Excel completely. I would like to hide only the workbook that contains the userform. |
All times are GMT +1. The time now is 08:41 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com