The simple solution would be to drag the formula down. However, if you want
a macro solution:

Sub CopyToEnd() 'untested
Dim LastRow As Long
LastRow = Cells(Rows.Count, 2).End(xlUp).Row
Range("N2").Copy Range("N3:N" & LastRow)
End Sub

--

Vasant

"alienscript" wrote in message
...
I have a list of PartNumber ranging from B2:B6880 and I am vlooking them
up to other worksheets for values of Safety-Stock, Qty-on-hand, PO-Qty,
etc..

For example, I insert column N to vlookup for the Safety-Stock values.
Double-clicking the black cross-sign that appears on the bottom-right
of cell N2 Vlookup formula doesn't copy the N2 formula to N6880 because
there are some blank cells in column M and column O.

I am hoping someone can help me with a code which can allow to copy
cell N2 formula to the last cell in column N where the whole row is not
totally blank, ie. at least has a cell in the row populated with
value.
Eg, if this row as mentioned above is row 6880, then row 6881 onwards
will be totally blank.


Appreciate so much if someone can help with with a code to do this.
Thanks so much in advance!


---
Message posted from http://www.ExcelForum.com/