Schleife für Variablen
#1
Hi,

aus Franks Code habe ich folgende Frage:

Wie geht so was über eine Schleife?
Code:
Private Sub CommandButton2_Click()
   Txtname1.Value = ""
   Txtname2.Value = ""
   Txtname3.Value = ""
   Txtname4.Value = ""
   Txtname5.Value = ""
   Txtname6.Value = ""
   Txtname7.Value = ""
   Txtname8.Value = ""
   Txtname9.Value = ""
   Txtname10.Value = ""
   Txtname11.Value = ""
   Txtname12.Value = ""
   Txtname13.Value = ""
End Sub
to top
#2
Hi Ralf,

wo befinden sich die Textboxen? Im Tabellenblatt oder in einem Userform?
to top
#3
Hi Ralf,

im Userform so:

Code:
Private Sub CommandButton2_Click()
Dim x As Long
For x = 1 To 10
    Me.Controls("Txtname" & x).Value = ""
Next x
End Sub
to top
#4
Hi Boris,

(30.11.2014, 14:10){Boris} schrieb: im Userform so:

genau, in einem Userform.

Aaah, ok, sowas hatte ich schon mal gesehen. Danke!
to top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste