![]() |
How do i express this in number
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. |
How do i express this in number
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. |
How do i express this in number
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. |
How do i express this in number
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. |
How do i express this in number
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. |
How do i express this in number
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. |
How do i express this in number
Slick. Does the trick. Do u know why .Insert does not show up on
intelisense(?), the down down method? "Harald Staff" wrote in message ... 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. |
How do i express this in number
...
Slick. Does the trick. Do u know why .Insert does not show up on intelisense(?), the down down method? No idea. When I (Excel XP) enter columns(1). nothing pops up in intellisense at all. A good start is to record a macro while doing it manually, like Sub Macro1() ' Macro1 Macro ' Macro recorded 31.01.2004 by Harald Staff Columns("D:D").Select Selection.Insert Shift:=xlToRight End Sub and from there shorten it as much as possible -until it don't work -and then one step back so it works again: Sub Macro1() Columns("D:D").Insert End Sub Thanks for the feedback. Best wishes Harald Followup to newsgroup only please. |
All times are GMT +1. The time now is 07:41 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com