VBA Rookie Issue
Scott,
I think this will work for you:
With Range("E:E")
'in case no constants or no formulas - either will trigger an error
On Error Resume Next
.SpecialCells(xlCellTypeConstants).Offset(0, -2).ClearContents
.SpecialCells(xlCellTypeFormulas).Offset(0, -2).ClearContents
On Error GoTo 0
End With
hth,
Doug
"Scott Wagner" wrote in message
...
This should be an easy one for the enlightened.
If cell in column E is not blank, clear contents of corresponding cell in
column C.
Otherwise, do nothing.
Thanks for your brains,
Scott
|