Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
156to160
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
156to160
156to160
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Mehrere Textboxen mit Schleife ansprechen

Mehrere Textboxen mit Schleife ansprechen
11.09.2002 13:53:04
Torsten
Hallo,

ich habe mehrere Textboxen und möchte diese auf Knopfdruck eines Optionbuttons nicht mehr für Eingaben empfänglich machen (=enable).
Da ich nicht für jede Textbox eine extra Zeile schreiben möchte, würde ich gerne die Textboxen 1 bis 20 in eine Schleife einbinden. Meine Versuche haben aber nicht geklappt.

Private Sub OptionButton1_Click()

Dim zaehler As Integer

zaehler = 1
For zaehler = 1 To 20
userform.textbox&zaehler.Enabled = False
Next
End Sub

Kann mir bitte jemand die Lösung mitteilen??

Vielen Dank!!!!!

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Mehrere Textboxen mit Schleife ansprechen
11.09.2002 14:35:24
L.Vira
Private Sub OptionButton1_Click()
Dim tb As Control
For Each tb In Me.Controls
If TypeName(tb) = "TextBox" Then
tb.Enabled = False
End If
Next
End Sub
Vielen Dank für die Antwort!!
11.09.2002 20:40:49
Torsten
Bin wieder ein Stückchen schlauer geworden. Auch "me" war für mich neu.
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige