Macro to clear Data

[howard]

I have data in Column H. I would like to clear all values in Col H where there is no value in Col E

Your assistance in this regard will be most appreciated

 

[VoG]

Try

Sub atest()
Dim LR As Long, i As Long
LR = Range("H" & Rows.Count).End(xlUp).Row
For i = 1 To LR
    If Range("E" & i).Value = "" Then Range("H" & i).ClearContents
Next i
End Sub

 

[Jonmo1]

Try

Columns("E:E").SpecialCells(xlCellTypeBlanks).Offset(, 3).ClearContents

 

[howard]

Hi Guys

Thanks for the help, mnost appreciated