Macro to Hide/Show Columns based on control cell value

[Steve N]

This should be simple, but I am totally stumped.

I have a series of columns where each column represents a project. I would
like to have only one column display at a time as determined by a drop box
selection where the last entry is "All" and all of the projects are show
when that is selected.

I recorded a macro to hide all of the columns, and then unhide the one that
is selected, or unhide all if the user selects all.

Columns("D:K").Select
Selection.EntireColumn.Hidden = True
Columns("E:E").Select
Selection.EntireColumn.Hidden = False

The drop box list and return cell is on a hidden sheet where I have a named
range that will calculate to the actual column(s) to be unhidden e.g., E:E.

How do I get the macro to use the value in the worksheet (the worksheet is
named "Controls" and the cell is named "shown" and is at C1. The project
list is on a sheet named "Notebook".

I may as well ask, what is the equivalent of "echo off" where the actions
are not shown while the macro is running?

It seems to be the declaring the variable and using it in the select command
that I am having trouble with.

I appreciate your help.

Steve

 

[Guest]

Sheets("Controls").Range("Shown"
Sheets("Controls").ComboBox1.Tex
Sheets("NoteBook").Columns("D:K"
Application.ScreenUpdating = Fals
Application.ScreenUpdating = True

----- Steve N wrote: ----

This should be simple, but I am totally stumped

I have a series of columns where each column represents a project. I woul
like to have only one column display at a time as determined by a drop bo
selection where the last entry is "All" and all of the projects are sho
when that is selected

I recorded a macro to hide all of the columns, and then unhide the one tha
is selected, or unhide all if the user selects all

Columns("D:K").Selec
Selection.EntireColumn.Hidden = Tru
Columns("E:E").Selec
Selection.EntireColumn.Hidden = Fals

The drop box list and return cell is on a hidden sheet where I have a name
range that will calculate to the actual column(s) to be unhidden e.g., E:E

How do I get the macro to use the value in the worksheet (the worksheet i
named "Controls" and the cell is named "shown" and is at C1. The projec
list is on a sheet named "Notebook"

I may as well ask, what is the equivalent of "echo off" where the action
are not shown while the macro is running

It seems to be the declaring the variable and using it in the select comman
that I am having trouble with

I appreciate your help

Stev

 

[Steve N]

Thank you so much. It works exactly like I intended.

Steve