Hi All,

I want to change this code when ever i run this code it takes a lot of time to run because of range, please modify this code For each K of used range of El:El column?

[VBA]Sub Test()
Dim k As Range
For Each k In Range("EL:EL")
If IsEmpty(k) Then
Range("Em:em").ClearContents
End If
Next
End Sub[/VBA]


Thanks and Regards
hammeed