in D1
IF(A1="","",your formula)
copy across to column N
I want to delete columns from D to N
ex.
when Cell A5 is empty or I delete the content from A5 the cells from D5 to N5 is deleted
Dim i As Integer
Dim lrow As Long
lrow = Cells.Find(What:="*", after:=Range("A1"), lookat:=xlPart, LookIn:=xlFormulas, searchorder:=xlByRows, searchdirection:=xlPrevious, MatchCase:=False).Row
For i = 1 To lrow
If IsEmpty(Range("A" & i).Value) = True Then
Range("D" & i & ":N" & i).ClearContents
End If
Next