Excel - Delete certain cells of active row

Ask a question


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.

Automation of running excel macros
Excel - Copy and paste values from specific columns