Forum Discussion

Celia9's avatar
Celia9
Brass Contributor
Jul 07, 2022

VBA to dynamic toggle columns hide/unhide

Hi,   I have a VBA to toggle my columns hide/unhide Private Sub ToggleButton1_Click() Dim xAddress As String xAddress = "F:G" If ToggleButton1.Value Then Application.ActiveSheet.Columns(xAdd...
excel
Macros and VBA
Celia9's avatar
Celia9
Brass Contributor
Jul 11, 2022
Sure, here it is!
https://www.dropbox.com/scl/fi/67r1ud35dkez5nazhal48/Planninglist-buttons.xlsm?dl=0&rlkey=hza0srmr05dot4vntjoizxsth

Thank you!
  • Celia9's avatar
    Celia9
    Brass Contributor
    Jul 11, 2022

    Thank you so much!

  • HansVogelaar's avatar
    HansVogelaar
    MVP
    Jul 11, 2022

    Celia9 

    The line

     

        Range("C1").Resize(1, LastColumn - 5).EntireColumn.Hidden = True

     

    hides all columns in the used range except for the first two and the last three. In the sample workbook, the data extend from column A to column R, so columns C to O get hidden, while columns A, B, P, Q and R will always remain visible.

  • Celia9's avatar
    Celia9
    Brass Contributor
    Jul 11, 2022
    This is amazing!!!

    I cleaned up your version, I also have M6, so when I filter, I do not see the last 3 columns anymore (workorder, description ann location)

    Where in the code can I find this option?

    And also, how can I thank you for all your help? Is there something I can sponsor or something like that?

Resources