VBA array with variable rows

[uti1301]

I have an array with 5 columns and variable rows. I am using Vlookup, which works for the array I have, with 5 columns and 13 rows.
The code is as follows:
SUB macro1()
Range("F2").select
activecell.formulaR1C1="=IFERROR(Vlookup(RC[-1],R2C1:R13C5,4,FALSE),0)"
Range("F2").select
Selection Autofill Destination:=Range("F2:F13",Type:=xlFillDefault
Range("F2:F13").select
end sub

However the rows are variable.
I would be very grateful if someone could tell me how to do this for any number of rows

Thanks in advance for any ideas

 

[Fluff]

Re: VBA arraywith variable rows

Try

Sub macro1()
Dim UsdRws As Long
UsdRws = Range("[COLOR=#ff0000]E[/COLOR]" & Rows.Count).End(xlUp).Row
With Range("F2:F" & UsdRws)
    .Formula = "=IFERROR(Vlookup(E2,A$2:E$" & UsdRws & ",4,FALSE),0)"
End With
End Sub

I've used col E to find the last used row.

 

[uti1301]

Re: VBA arraywith variable rows

Thank you very much Fluff. I think this will work perfectly. I actually worked out how to do it, but your code looks better than mine, so I will use yours.
Thanks again

 

[Fluff]

Re: VBA arraywith variable rows

Glad to help & thanks for the feedback