Cellen blank maken dmv vba knop

[Smietje]

Hallo,

Ik wil graag een knop maken op mijn formulier dat de geselecteerde 4 cellen doet leeg maken, dus niet verwijderen want er staan condities in.
De knop maken lukt me nog wel maar de queries niet.

Dus als ik cel c24 selecteer dan wil ik dat de 3 cellen naar rechts ook blank worden. en als ik C30 bv selecteer dan zou hetzelfde moeten gebeuren.

kan iemand mij helpen met deze vraag?

alvast bedankt

 

[gast0660]

Zoiets?
Ik neem aan dat je met formulier uw werkblad bedoelt.
Zet deze onder uw knopje

Sub Dotchie()
Range(ActiveCell.Offset(, 0), ActiveCell.Offset(, 4)).ClearContents
End Sub

 

[Smietje]

Super, dankjewel!

 

[gast0660]

Mooi zo:thumb:
Ik had zelfs een typo foutje.
Volgens uw vraag moest het zijn.

Range(ActiveCell.Offset(, 0), ActiveCell.Offset(, [COLOR="#FF0000"]3[/COLOR])).ClearContents