Checkbox

[Joheri]

Hallo,

Ik wil graag een DTPicker object zichtbaar maken via een CheckBox.

met de volgende code zou dat moeten lukken dacht ik, maar helaas ik krijg het niet werkend.


Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
DTPicker1.Visible = True

End If

End Sub


Wat doe ik fout?

Gr. Johan.

 

[ExcelAmateur]

Joheri,

Ik kan het hier niet checken omdat er in Excel 2010 geen DTPicker zit.
Met Else wordt hij weer onzichtbaar als de checbox is uitgeschakeld.

Private Sub CheckBox1_Click()
  If CheckBox1.Value = True Then
    DTPicker1.Visible = True
  Else: DTPicker1.Visible = False
  End If
End Sub

 

[ExcelAmateur]

Joheri,

Je heb de code toch wel achter het blad staan?
Als ik de DTPicker verander in een CommandButton (deze op het blad gezet) dan werkt het wel.

 

[Joheri]

Sorry Mannen, ik heb een stomme fout gemaakt.
i.p.v. een CheckBox had ik een "selectievakje" neergezet.

Ik heb het inmiddels werkend,maar toch bedankt voor de hulp.