I'm new to
the VBA stuff, so I'm seeking help. This code was given in another
forum, but I thought it would kind of help  me show what I'm trying
to do.

What I'm trying to accomplish is have the spreadsheet completely
automated. data  can be sent at any time, so the macro will (should)
check to see if the current row  has data. If it does, move to the
next row and copy  the previos row's formula.

I guess this code is worthless for most part.


Public Sub CopyDown()
LastRow = Range("A65536").End(xlUp).Row
For i = 1 To LastRow
If Range("A" & i).Value = "" Then
Range("A" & i - 1 & ":CB" & i - 1).Formula.Copy Destination:=Range
("A" & i)
End If
Next i
End Sub