Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
hide-unhide
Try a Toggle Button and this.
Option Explicit Private Sub ToggleButton1_Click() If ActiveSheet.Name = ("Sheet1") Then If Worksheets("Sheet1").Columns("C:T").Hidden = False Then Worksheets("Sheet1").Columns("C:T").Hidden = True ElseIf Worksheets("Sheet1").Columns("C:T").Hidden = True Then Worksheets("Sheet1").Columns("C:T").Hidden = False End If End If End Sub HTH "hoysala" wrote: i have written the following code to hide a column can anybody help me altering the program to swap between hide and unhide using the same CommandButton ? Private Sub CommandButton5_Click() If ActiveSheet.Name = SHEETNAME Then If Worksheets(SHEETNAME).Columns("c:t").Hidden = False Then Worksheets(SHEETNAME).Columns("c:t").Hidden = True End If End If End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Hide/Unhide row VBA | Excel Discussion (Misc queries) | |||
Hide/Unhide | Excel Discussion (Misc queries) | |||
hide/unhide | Excel Programming | |||
hide/unhide | Excel Discussion (Misc queries) | |||
hide/unhide | Excel Programming |