What is an equilvalent expression in Range("A1") using only number inside
the prarentheses, how about Range("2:3")

I am trying to loop thru cells in a range, but working with qoutes make it
little bit harder.

thanks.

Hi

Cells(rownumber, columnnumber)
like this:

Sub LoopEm()
Dim R As Long, C As Long
For R = 3 To 5
For C = 2 To 3
MsgBox Cells(R, C).Address
Next
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
What is an equilvalent expression in Range("A1") using only number inside
the prarentheses, how about Range("2:3")

I am trying to loop thru cells in a range, but working with qoutes make it
little bit harder.

thanks.

Thanks for fast reply, but I am actually look for an equivalent expression
only. What would Range("A1") or Range("2:3") be using only numbers inside
the ().

"Harald Staff" wrote in message
...
Hi

Cells(rownumber, columnnumber)
like this:

Sub LoopEm()
Dim R As Long, C As Long
For R = 3 To 5
For C = 2 To 3
MsgBox Cells(R, C).Address
Next
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
What is an equilvalent expression in Range("A1") using only number
inside
the prarentheses, how about Range("2:3")

I am trying to loop thru cells in a range, but working with qoutes make
it
little bit harder.

thanks.

I don't quite follow you. But you want to loop all cells in a known range. Select a few
cells and see if this is what you're after:

Sub Loop2()
Dim L As Long
Dim R As Range
Set R = Selection

For L = 1 To R.Count
MsgBox R(L).Address
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
Thanks for fast reply, but I am actually look for an equivalent expression
only. What would Range("A1") or Range("2:3") be using only numbers inside
the ().

"Harald Staff" wrote in message
...
Hi

Cells(rownumber, columnnumber)
like this:

Sub LoopEm()
Dim R As Long, C As Long
For R = 3 To 5
For C = 2 To 3
MsgBox Cells(R, C).Address
Next
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
What is an equilvalent expression in Range("A1") using only number
inside
the prarentheses, how about Range("2:3")

I am trying to loop thru cells in a range, but working with qoutes make
it
little bit harder.

thanks.

ok, i'll be specific.
i need to do the following:

while ...
Range("E3").EntireColumn.Insert
.. fill up Range("F3") with some data
Range("G3").EntireColumn.Insert
... fill up Range("H3") with some data
wend


So working with qoute is little harder,(i mean how can u get from E to F),
can you help me with this. the RANGE, CELL, SELECTION object is a little
confusing to me.


"Harald Staff" wrote in message
...
I don't quite follow you. But you want to loop all cells in a known range.
Select a few
cells and see if this is what you're after:

Sub Loop2()
Dim L As Long
Dim R As Range
Set R = Selection

For L = 1 To R.Count
MsgBox R(L).Address
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
Thanks for fast reply, but I am actually look for an equivalent
expression
only. What would Range("A1") or Range("2:3") be using only numbers
inside
the ().

"Harald Staff" wrote in message
...
Hi

Cells(rownumber, columnnumber)
like this:

Sub LoopEm()
Dim R As Long, C As Long
For R = 3 To 5
For C = 2 To 3
MsgBox Cells(R, C).Address
Next
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
What is an equilvalent expression in Range("A1") using only number
inside
the prarentheses, how about Range("2:3")

I am trying to loop thru cells in a range, but working with qoutes
make
it
little bit harder.

thanks.

I'd do that one like this:

Sub test()
Dim L As Long
For L = 5 To 17 Step 2
Columns(L).Insert
Cells(3, L + 1).Value = Time 'or whatever
Next
End Sub

--
HTH. Best wishes Harald
Followup to newsgroup only please.

"Phil Hunt" wrote in message
...
ok, i'll be specific.
i need to do the following:

while ...
Range("E3").EntireColumn.Insert
.. fill up Range("F3") with some data
Range("G3").EntireColumn.Insert
... fill up Range("H3") with some data
wend


So working with qoute is little harder,(i mean how can u get from E to F),
can you help me with this. the RANGE, CELL, SELECTION object is a little
confusing to me.