ich habe eine Userform mit vielen Textboxen erstellt.
Ich möchte jetzt den Abstand zwischen den Textboxen gleich stellen,
weiß aber nicht wie es geht.
Den Abstand nach links etc., habe ich.
mfg sigrid
Private Sub UserForm_Initialize()
Dim i As Integer
Const iAbstand As Integer = 12
TextBox1.Top = 15
TextBox1.Left = 20
For i = 2 To 10 'anpassen
With Controls("Textbox" & i - 1)
Controls("Textbox" & i).Top = .Top + .Height + iAbstand
Controls("Textbox" & i).Left = .Left
End With
Next i
With TextBox10
Me.Height = .Top + .Height + 50
End With
End Sub