Excel: elimina alcune celle della riga attiva

Problema

Vorrei un codice per quanto segue:

Verifica quale riga è attiva / selezionata e quindi elimina i dati che si trovano nella 5a e nella 7a colonna di quella riga.

Ho provato il seguente:

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

Qualcuno può aiutarmi con questo?

Provare:

 celle (r, 5) e celle (r, 7)

Grazie a venka1926 per questo suggerimento sul forum.