Hide Workbook

  • Thread starter Thread starter aftamath77
  • Start date Start date
A

aftamath77

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.
 
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
 
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
 
Try this from another workbook
Workbooks("WkbNameHere").window(1).hidden = True

or

Windows("WkbNameHere.xls").Visible = False
 
Back
Top