Menu
  1. Accueil
  2. Tech Forum
  3. Office Software
  4. Excel

Delete certain cells of active row [Solved/Closed]

Report
-
 tatosgr -
Hello,

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?

Best regards,
Trowa
See more

4 replies

Answer 1 / 4
Posts
1862
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
July 30, 2015
 790
try
cells(r,5) and cells(r,7)
Thank you
3
Thank you

A few words of thanks would be greatly appreciated. Add comment

CCM 4365 users have said thank you to us this month

Report

Thanks Venkat, works like a charm.
Answer 2 / 4

How do you declare r ? Variant? integer? range?
Report
Posts
4475
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
January 6, 2016
 756
Long would be the safest. It is being used to handle row numbers.
Answer 3 / 4
Posts
1862
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
July 30, 2015
 790
[quote]
How do you declare r ? Variant? integer? range?[/quote]

something like this
dim r as range, j as integer, k as long,m(leave it blank then it is variant)
Answer 4 / 4

Thanks rizvisa1 and venkat1926 .. I'd try both (waiting for errors or bugs :P) .. If I have any doubt, I'll stop by again :)

Thanks again :)
Ask a question