Excel - ลบเซลล์ของแถวที่ใช้งานอยู่บางเซลล์

ปัญหา

ฉันต้องการรหัสสำหรับต่อไปนี้:

ตรวจสอบแถวที่แอ็คทีฟ / เลือกแล้วลบข้อมูลที่อยู่ในคอลัมน์ที่ 5 และ 7 ของแถวนั้น

ฉันได้ลองทำสิ่งต่อไปนี้แล้ว:

 การทดสอบย่อย () r = ActiveCell.Row Range (r, 5) .ClearContents Range (r, 7) .ClearContents End Sub 

มีคนช่วยฉันออกมาได้ไหม

สารละลาย

ลอง:

 เซลล์ (r, 5) และเซลล์ (r, 7) 

บันทึก

ขอบคุณ venka1926 สำหรับเคล็ดลับนี้ในฟอรัม