VBA dim statement

[Titian]

I am attempting to to use the statement

Dim customers(lr) as long

where "lr" is the number of the last row.

The statement fails with
"Compile error"
"Constant expression required"

Is it possible to load a variable into a "Dim" statement like this?

 

[VoG]

Try something like

Dim customers() As Long, lr As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
ReDim customers(1 To lr)

 

[al_b_cnu]

Hi,

try:

Dim customers as Long

customers = lr

To determine the last row of, say, sheet1 column A, try

Dim customers as Long

customers=Sheets("Sheet1").Cells(rows.count,"A").end(xlUp).Row

 

[Titian]

Thanks guys, VoG gives me the answer I was looking for.

Thanks Alan for your interest too