Looping through Excel columns? 3

[VBAguy22]

Hi
How do I loop through Excel columns? IE how do I read all the values from row 1 say...
Can I do
For i: A to IV ?

 

[PHV]

Something like this ?
For Each c In Range("A1:IV1")
MsgBox c.Address & " = " & c.Value
Next

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[xlbo]

or:

for i = 1 to 256
msgbox "Val:" & cells(1,i).value
next i

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question

 

[arides]

or:
dim rngObj as range

set rngobj = Range ("A1:B2")

for each c in rngobj.columns

next c

there are several ways to determine the working range. this is another, which cycles through ALL the columns on the sheet

Dim c As Range

For Each c In ActiveSheet.Columns
c.Cells(1, 1).Value = 1
Next c