-
Setting Sheet Visible Error
These lines work:
[VBA]
ThisWorkbook.Sheets(Array("Sheet2", "Sheet3")).Visible = 0 ' Hidden
ThisWorkbook.Sheets("Sheet2").Visible = -1 ' Visible
ThisWorkbook.Sheets("Sheet3").Visible = -1 ' Visible
ThisWorkbook.Sheets("Sheet2").Visible = 2 ' Very Hidden
ThisWorkbook.Sheets("Sheet3").Visible = 2 ' Very Hidden
[/VBA]
This dosen't work:
[VBA]
ThisWorkbook.Sheets(Array("Sheet2", "Sheet3")).Visible = -1 ' Visible
ThisWorkbook.Sheets(Array("Sheet2", "Sheet3")).Visible = 2 ' Very Hidden
[/VBA]
"Run-time error '1004'"
I am ensuring that at least one sheet remains visible at all times.
The worksheets and workbook are not protected.
Am I doing something wrong?
It works by setting the sheets one at a time...
-
[VBA]Dim sh
For Each sh In Sheets(Array("Sheet1", "Sheet2"))
sh.Visible = False
Next[/VBA]
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'
-
Yeah, Thanks.
I know I can do that - I was trying to set sheets as VeryHidden or Visible in one hit.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules