Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
hide-unhide
Hi Hoy. :-)
For a very "personal" solution (no Button, etc), try: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Cancel = True With ActiveSheet If .Columns("c:t").Hidden = False Then .Columns("c:t").Hidden = True Else .Columns("c:t").Hidden = False End If End With End Sub Saluti Eliano On 18 Mar, 19:37, 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 Programming | |||
Hide/Unhide Help | Excel Programming | |||
Hide Unhide | Excel Discussion (Misc queries) | |||
Hide/unhide | Excel Worksheet Functions |