Learn to build secure applications from the mindset of the hacker and avoid being exploited.
excel vba select range of row with numbers only
In statements like this:
dim ws as worksheet
ws = ThisWorkbook.worksheets(1)
ws .Rows([range of rows]).AutoFit
or
Set myRange = ws .Rows([range of rows]).EntireRow
how might I specify the [range of rows] using just numbers, instead of the string "R1C4" type construct?
That is, something like this:
ws.range(ws.cells(1,1),ws.
which executes, but then this:
ws.range(ws.cells(1,1),ws.
fails with "Select method of range failed", so I can't verify if I really have the range of rows I want in r1.
Any suggestions on this would be appreciated.
Thanks!
dim ws as worksheet
ws = ThisWorkbook.worksheets(1)
ws .Rows([range of rows]).AutoFit
or
Set myRange = ws .Rows([range of rows]).EntireRow
how might I specify the [range of rows] using just numbers, instead of the string "R1C4" type construct?
That is, something like this:
ws.range(ws.cells(1,1),ws.
which executes, but then this:
ws.range(ws.cells(1,1),ws.
fails with "Select method of range failed", so I can't verify if I really have the range of rows I want in r1.
Any suggestions on this would be appreciated.
Thanks!
Do more with
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
You can do something like this...
This will select row number-1 to row -500 in your my range..Now in order to select as well you can do this...
or
Saurabh...
Set myrange = ws.Rows("1:500")
This will select row number-1 to row -500 in your my range..Now in order to select as well you can do this...
ws.Range("1:500").Select
or
ws.Rows("1:500").Select
Saurabh...
Thanks for the input. Pardon, I wan't specific....I'm trying to avoid ALL string constructs, including "1:500" (if possible)
Assuming your startrow is sr and endrow as er and starts at 1 and ends at 500..you can do something like this and then you can change sr and er to whatever logic you want to use to determine the starting point and end point of your data-set..
Saurabh...
dim sr as long,er as long
sr=1
er=500
myrange=ws.rows(sr &":"& er)
Saurabh...
You are missing a right parenthesis character.
ws.range(ws.cells(1,1),ws.cells(500, 1).EntireR ow.Select
fails with "Select method of range failed", so I can't verify if I really have the range of rows I want in r1.
ws.range(ws.cells(1,1),ws.cells(500,1)).EntireRow.Select
Thanks for the input.
@aikimark: You're correct on the missing right parens...though oddly that's not missing in my code file. And in my code file it still gives the same error.
ws.Range(ws.Cells(1, 1), ws.Cells(500, 1)).EntireRow.Select
@Saurabh: with respect to myrange=ws.rows(sr &":"& er), that's simpler, thoughtstill using the string construct.
So, maybe there IS no way to do it purely with numbers, without string usage?
@aikimark: You're correct on the missing right parens...though oddly that's not missing in my code file. And in my code file it still gives the same error.
ws.Range(ws.Cells(1, 1), ws.Cells(500, 1)).EntireRow.Select
@Saurabh: with respect to myrange=ws.rows(sr &":"& er), that's simpler, thoughtstill using the string construct.
So, maybe there IS no way to do it purely with numbers, without string usage?
codequest,
Yes if you are using a combination of range you need to use a string construct without it you can't use the entire range...you can just select a single row only..
Saurabh...
Yes if you are using a combination of range you need to use a string construct without it you can't use the entire range...you can just select a single row only..
Saurabh...
@Sauraba: Thanks, I expect you're correct. I'm going to let this sit out there for a day and see if there are any other views, then close it out.
are your service patches up to date?
I invoked your select method on an Excel 2003 workbook and it worked as expected.
I invoked your select method on an Excel 2003 workbook and it worked as expected.
Premium Content
You need an Expert Office subscription to comment.Start Free Trial