range function

  • Thread starter Thread starter Rick
  • Start date Start date
R

Rick

This example works Range("A3:F" & SheetEnd).Select...
How do I make this one work? Range("A" & SheetStart & ":D" & SheetEnd).Select

The statement has to be as generic as possible.
 
Sub rick()
Dim SheetStart As Long, SheetEnd As Long
SheetStart = 3
SheetEnd = 11
Range("A" & SheetStart & ":D" & SheetEnd).Select
End Sub
 
I'm not sure what your ultimate question is, but the range you asked about
appears to work fine (as long as you have assigned values to both SheetStart
and SheetEnd).
 
Have you tried this which worked for me

Sub thisone()
sheetstart = 5
sheetend = 12
Range("A" & sheetstart & ":D" & sheetend).Select
End Sub


For some reason VBA seems to want the & to have spaces each side
 
Perhaps he means the first and last rows in ActiveSheet.UsedRange??

Sub rick()
Dim SheetStart As Long, SheetEnd As Long
Set r = ActiveSheet.UsedRange
SheetEnd = r.Rows.Count + r.Row - 1
SheetStart = r.Row
Range("A" & SheetStart & ":D" & SheetEnd).Select
End Sub
 
This also works -- note the comma not semi-colon with the Range arguments

Sub onemore()
row1 = 5: col1 = 1
row2 = 12: col2 = 4
Range(Cells(row1, col1), Cells(row2, col2)).Select
End Sub

best wishes
 
This might work better

Range("A" & SheetStart & ":D" & Right(SheetEnd, 2)).Select
 
This should do it. Since SheetEnd is apparently a cell address, it cannot be
used as a row reference.

Range("A" & SheetStart & ":D" & Range(SheetEnd).Row).Select
 
I was trying to get it to execute, even after compiling. It is working now
in the original format. don't understand why it did not work earlier. Thanks
all for your help
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top