PDA

View Full Version : Solved: Get Tabs Back



bopo
01-18-2007, 12:14 PM
HI

Recently I hide my tabs via some code, However I want the tabs back so I set the code to true, however this didnt bring the tabs back either, therefore I deleted the code and I still dont have tabs, help please :(

Simon Lloyd
01-18-2007, 12:33 PM
Bopo, please supply the code you used to hide the sheets - reall it should be a simple as Sheets("Sheet1").Visible = True

Regards,
Simon

CBrine
01-18-2007, 12:40 PM
bopo,
Here's an extension of Simon's code, that cycles through each sheet in a workbook and makes it visible.


sub UnHideAll()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
ws.Visible = xlSheetVisible
Next
End Sub


1. Open the vba editor by press Alt-F11.
2. Using the project explorer add a module to your project.
3. Using the Excel menu(not the vbe menu) select Tools...Macro.....Macro.
4. Select the macro from the dialogs list and press the run button.

HTH
Cal

lucas
01-18-2007, 12:51 PM
bopo, if you would provide a link to the original thread so we didn't have to search for it this would be much simpler for us and you...............
http://www.vbaexpress.com/forum/showthread.php?p=86693#post86693
post # 4
ActiveWindow.DisplayWorkbookTabs = False
If you set it to true then your tabs will re-appear.........
If all else fails go to tools - options....under the view tab check the sheet tabs checkbox....

bopo
01-18-2007, 01:03 PM
Thanks, I needed to check the check box, thanks :D