VBA Help - errors with only 1 row of data

[danny8890]

Hi,

I've got a piece of code that autofills the sheet when run macro it works perfectly fine unless the sheet has only got 2 rows of data (header row and a data row).

I feel i'm missing something quite simple if someone could help me so the auto fill will start from row 2 and auto fill either just the 1 row if data is there or do as many rows are in the sheet.

sh.Range("H2:N2").AutoFill Destination:=sh.Range("H2:N" & sh.Range("A" & Rows.Count).End(xlUp).Row)

Thanks in advance

 

[steve the fish]

You could do:

lr = sh.Range("A" & Rows.Count).End(xlUp).Row
If lr > 2 Then sh.Range("H2:N2").AutoFill Destination:=sh.Range("H2:N" & lr)

 

[danny8890]

wow that's to simple lol, thanks so much been annoying me for ages!