nadat een waarde in een cell 'true' wordt

Status
Niet open voor verdere reacties.
Zoiets:
Code:
Sub CheckBox1_Click()
    If Range("D1") Then Range("D3:D8").ClearContents
    Range("D1") = False
End Sub
Wel even de macro aan die CheckBox toewijzen.
 
Code:
Sub Selectievakje1_Klikken()
    If Range("D1").Value = True Then Range("D3:D8").ClearContents
End Sub
 
Mag je de vraag op <Opgelost> zetten :).
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan