Excel - Delete certain cells of active row

April 2018


I would like a code for the following:

Check which row is active/selected and then delete the data which is in the 5th and 7th column of that row.

I've tried the following:

Sub test() 
r = ActiveCell.Row 
Range(r, 5).ClearContents 
Range(r, 7).ClearContents 
End Sub 

Can someone help me out with this?


cells(r,5) and cells(r,7)


Thanks to venka1926 for this tip on the forum.
Published by aakai1056. Latest update on March 6, 2010 at 05:18 AM by aakai1056.
This document, titled "Excel - Delete certain cells of active row," is available under the Creative Commons license. Any copy, reuse, or modification of the content should be sufficiently credited to CCM (https://ccm.net/).
Automation of running excel macros
Excel - Copy and paste values from specific columns