Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
356to360
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
356to360
356to360
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

alle Daten user form löschen

alle Daten user form löschen
05.01.2004 19:40:06
Jonathan
Liebes Forum,

Ich habe hier (von Dieter Klemke) folgenden Code erhalten, um alle Daten in meiner UserForm zu löschen:


Private Sub Datenlöschen_Click()
Dim ObCb As Object
For Each ObCb In Me.Controls
If TypeName(ObCb) = "TextBox" Then ObCb.Value = ""
If TypeName(ObCb) = "ComboBox" Then ObCb.ListIndex = -1
Next ObCb
End Sub


- Vielen Dank dafür -

nun ist mir aber aufgefallen, dass alle Daten bis auf aktivierte Kontrollkästchen gelöscht werden. Ich möchte, dass auch diese deaktiviert werden....

wie kann ich das in den Code mit einbauen?

Danke.

Jonathan

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: alle Daten user form löschen
05.01.2004 19:42:44
Ulf
If TypeName(ObCb) = "CheckBox" Then ObCb = False

Ulf
AW: alle Daten user form löschen
05.01.2004 19:44:11
Jonathan
Ulf,
manchmal ist man auch blind....... :-)

Danke!

Jonathan
AW: alle Daten user form löschen
05.01.2004 19:44:58
Thorsten
Hi

Vielleicht geht es so:


Private Sub Datenlöschen_Click()
Dim ObCb As Object
For Each ObCb In Me.Controls
If TypeName(ObCb) = "TextBox" Then ObCb.Value = ""
If TypeName(ObCb) = "ComboBox" Then ObCb.ListIndex = -1
>>>>    If TypeName(ObCb) = "CheckBox" Then ObCb.Value = "" <<<<<<<<<<<<<<<
Next ObCb
End Sub


Hierbei handelt es sich nur um eine Idee. Hab es nicht getestet.

Ciao
Thorsten
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige