Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple Cells
Hello. I have a sub that iterates over some cells in my worksheet. So
something like this: CurRow=1 Do While (CurRow <= 1000) CurCol = 1 Do While (CurCol <=1000) Worksheet.Cells(CurRow, 1) .Value = ComputeValue(CurRow, CurCol) CurCol = CurCol + 1 Loop CurRow = CurRow + 1 Loop I want to select some of those cells during the iteration, but don't have good way to select a range. For instance I want to be able to do something like: Worksheets.Range(CurCol & CurRow & ":" & CurCol + 37 & CurRow + 29).Select But that that wouldn't work because CurCol is a numeric value not the A B C ... value that Range expects. Any idea? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple Cells
Hi,
Addendum, meant to include in the previous post. Worksheet.Cells . . . . . . . won't work If it's the activesheet you can use Activesheet.Cells . . . . . . . if you want. Don "Kramer" wrote in message oups.com... Hello. I have a sub that iterates over some cells in my worksheet. So something like this: CurRow=1 Do While (CurRow <= 1000) CurCol = 1 Do While (CurCol <=1000) Worksheet.Cells(CurRow, 1) .Value = ComputeValue(CurRow, CurCol) CurCol = CurCol + 1 Loop CurRow = CurRow + 1 Loop I want to select some of those cells during the iteration, but don't have good way to select a range. For instance I want to be able to do something like: Worksheets.Range(CurCol & CurRow & ":" & CurCol + 37 & CurRow + 29).Select But that that wouldn't work because CurCol is a numeric value not the A B C ... value that Range expects. Any idea? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple Cells
I wasn;t really asking about how to refer to a Worksheet. I guess that
I did post it wrong. What I meant to say was this: OutWorksheet = Worksheets("some name") CurRow=1 Do While (CurRow <= 1000) CurCol = 1 Do While (CurCol <=1000) OutWorksheet.Cells(CurRow, 1) .Value = ComputeValue(CurRow, CurCol) CurCol = CurCol + 1 Loop CurRow = CurRow + 1 Loop I want to select some of those cells during the iteration, but don't have good way to select a range. For instance I want to be able to do something like: OutWorksheet.Range(CurCol & CurRow & ":" & CurCol + 37 & CurRow + 29).Select So basically, I'm looking for a way to build a range object given numerical indices CurCol and CurRow. Any help? Don Lloyd wrote: Hi, Addendum, meant to include in the previous post. Worksheet.Cells . . . . . . . won't work If it's the activesheet you can use Activesheet.Cells . . . . . . . if you want. Don "Kramer" wrote in message oups.com... Hello. I have a sub that iterates over some cells in my worksheet. So something like this: But that that wouldn't work because CurCol is a numeric value not the A B C ... value that Range expects. Any idea? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple Cells
First, if you're using xl2003 or below, you don't have 1000 columns in your
worksheet. and you can do stuff like: with worksheets("sheetnamehere") .select .range(.cells(currow,curcol),.cells(currow+29,curc ol+37)).select end with Or you could use .Resize() with worksheets("sheetnamehere") .select .cells(currow,curcol).resize(29+1,37+1).select 'or .cells(currow,curcol).resize(30,38).select end with Remember, you have to be on the active sheet to do .select's. Kramer wrote: Hello. I have a sub that iterates over some cells in my worksheet. So something like this: CurRow=1 Do While (CurRow <= 1000) CurCol = 1 Do While (CurCol <=1000) Worksheet.Cells(CurRow, 1) .Value = ComputeValue(CurRow, CurCol) CurCol = CurCol + 1 Loop CurRow = CurRow + 1 Loop I want to select some of those cells during the iteration, but don't have good way to select a range. For instance I want to be able to do something like: Worksheets.Range(CurCol & CurRow & ":" & CurCol + 37 & CurRow + 29).Select But that that wouldn't work because CurCol is a numeric value not the A B C ... value that Range expects. Any idea? -- Dave Peterson |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple Cells
Thanks a lot.
I guess that I don't have 1000 cols (it was just an example), but I do have a lot. Thanks again. Dave Peterson wrote: First, if you're using xl2003 or below, you don't have 1000 columns in your worksheet. and you can do stuff like: with worksheets("sheetnamehere") .select .range(.cells(currow,curcol),.cells(currow+29,curc ol+37)).select end with Or you could use .Resize() with worksheets("sheetnamehere") .select .cells(currow,curcol).resize(29+1,37+1).select 'or .cells(currow,curcol).resize(30,38).select end with Remember, you have to be on the active sheet to do .select's. Kramer wrote: Hello. I have a sub that iterates over some cells in my worksheet. So something like this: CurRow=1 Do While (CurRow <= 1000) CurCol = 1 Do While (CurCol <=1000) Worksheet.Cells(CurRow, 1) .Value = ComputeValue(CurRow, CurCol) CurCol = CurCol + 1 Loop CurRow = CurRow + 1 Loop I want to select some of those cells during the iteration, but don't have good way to select a range. For instance I want to be able to do something like: Worksheets.Range(CurCol & CurRow & ":" & CurCol + 37 & CurRow + 29).Select But that that wouldn't work because CurCol is a numeric value not the A B C ... value that Range expects. Any idea? -- Dave Peterson |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Multiple Cells
I assume you didn't see my first post !
Don "Kramer" wrote in message oups.com... I wasn;t really asking about how to refer to a Worksheet. I guess that I did post it wrong. What I meant to say was this: OutWorksheet = Worksheets("some name") CurRow=1 Do While (CurRow <= 1000) CurCol = 1 Do While (CurCol <=1000) OutWorksheet.Cells(CurRow, 1) .Value = ComputeValue(CurRow, CurCol) CurCol = CurCol + 1 Loop CurRow = CurRow + 1 Loop I want to select some of those cells during the iteration, but don't have good way to select a range. For instance I want to be able to do something like: OutWorksheet.Range(CurCol & CurRow & ":" & CurCol + 37 & CurRow + 29).Select So basically, I'm looking for a way to build a range object given numerical indices CurCol and CurRow. Any help? Don Lloyd wrote: Hi, Addendum, meant to include in the previous post. Worksheet.Cells . . . . . . . won't work If it's the activesheet you can use Activesheet.Cells . . . . . . . if you want. Don "Kramer" wrote in message oups.com... Hello. I have a sub that iterates over some cells in my worksheet. So something like this: But that that wouldn't work because CurCol is a numeric value not the A B C ... value that Range expects. Any idea? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Select multiple adjacent cells of multiple cells without selecting | New Users to Excel | |||
Select multiple adjacent cells of multiple cells without selecting | Excel Worksheet Functions | |||
macro copy/paste data from multiple cells to multiple cells | Excel Discussion (Misc queries) | |||
Date and time stamping multiple cells for multiple entries. | Excel Worksheet Functions | |||
make multiple cells in 1 worksheet equal multiple cells in another | Excel Worksheet Functions |