CheckBox
10.05.2005 09:58:44
Gregor
Mit folgendem CeckBox-Code steure ich den weiteren Verlauf einer Prozedur. Bei enem erneuten Aufruf der UserForm sind beide CheckBox-Kästchen mit einem Häckchen versehen. Wie kann ich diese löschen?
Private Sub CheckBox1_Click()
Abfrage_Perronhöhen.Hide
Spalte_MinHöhe = Worksheets("Master Datei").Cells.Find(What:="Min Perronhöhe").Column
MinMax = Spalte_MinHöhe
End Sub
Private Sub CheckBox2_Click()
Abfrage_Perronhöhen.Hide
Spalte_MaxHöhe = Worksheets("Master Datei").Cells.Find(What:="Max Perronhöhe").Column
MinMax = Spalte_MaxHöhe
End Sub
Vielen Dank
Gregor
Anzeige