Clear Cell Content

[Av8tordude]

I'm using this code to clear a row (Column A - R), However, I like it to skip column "J"... Can someone assist. Thanks

ActiveCell.Resize(, 18).ClearContents

 

[Fluff]

Try

Intersect(ActiveCell.EntireRow, Range("A:I,K:R")).ClearContents

 

[Av8tordude]

Works greats!!! Thank you for the quick response and your expertise.

 

[Fluff]

Glad to help & thanks for the feedback

 

[Rick Rothstein]

Just to show there are usually multiple ways to do something in VBA, this should also work...

Range(Replace("A#:I#,K#:R#", "#", ActiveCell.Row)).ClearContents