Need to fill column G with data, based on length of column B

[Henner]

Hi,

I receive a 40,000+ row spreadsheet every morning in which the number of rows of data it has can vary from day to day.

I need a way to fill column G (which is always blank) with the number 38, from cell G2 down to the last cell in column G that is on the same row as the last cell of data in column B.

How do I do this please in a macro, when the number of data cells in column B varies from day to day?

Thanks
Paul

 

[Jim North]

Hello Paul,

This should do it:

<pre>
Sub stuff38()

Dim LastRow As Long
LastRow = Worksheets("Sheet1").Range("B65536").End(xlUp).Row
Range("G2:G" & LastRow).Value = "38"

End Sub

</pre>

 

[Henner]

Hello again Jim,

Excellent! Many thanks for your rapid help yet again.

Best regards,
Paul