Yep, I guess I'll have to pay my dues again and work myself up from the
Tools | Options questions! <g

__________________________________________________ _______________________

"Dave Peterson" wrote in message
...
I haven't changed. I don't always read the whole post--or read it the way
I
want to.

And just to give you a leg up, have this in your clipboard:
Tools|Options|General tab|Uncheck R1C1 Reference style

(some questions don't change <vbg.)

Vasant Nanavati wrote:

Good point, but since the OP said it was a "range of columns", I assumed
that row 1 would be included. :-)

And thanks for the welcome; it's nice to "see" all the old "faces." I
hope
to be here more consistently (although it'sll probably take me a while to
get up to speed!).

__________________________________________________ ______________________

"Dave Peterson" wrote in message
...
Welcome back Vasant!

Just in case that HiddenRange doesn't include row 1, I'd use something
like:

With worksheets("sheet1") '<- I like to specify the worksheet
For Each c In _
Application.Intersect(.Range("HiddenRange").entire column,
.Rows(1))

....
End with
End Sub




Vasant Nanavati wrote:

Something like:

Sub ShowOneByOne()
Dim c As Range
For Each c In Application.Intersect(Range("HiddenRange"), Rows(1))
If c.EntireColumn.Hidden Then Exit For
Next
On Error Resume Next
c.EntireColumn.Hidden = False
On Error GoTo 0
End Sub

There's probably a better way but this should work.
__________________________________________________ ______________________

"blonde1030" wrote in message
...
Hello,

I have a named range of columns that are hidden. I would like a
macro
that
will unhide the left-most column (that is hidden) in the range when
a
button
is clicked.

For instance, clicking the button once would unhide column 1 of
range.
Clicking button again would unhide column 2 of hidden range, and so
forth.

I greatly appreciate any help!

--

Dave Peterson

--

Dave Peterson