Schleife für Variablen

[Rabe]

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

[{Boris}]

Hi Ralf,

wo befinden sich die Textboxen? Im Tabellenblatt oder in einem Userform?

[{Boris}]

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

[Rabe]

Hi Boris,

im Userform so:

genau, in einem Userform.

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