Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Textfelder in UserForm beim Start vorbelegen

Gruppe

TextBox

Problem

Wie kann ich 5 Textfelder in einer UserForm beim Aufruf des Dialogs mit fortlaufenden Werten belegen?

Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.

ClassModule: frmPreSet

Private Sub cmdContinue_Click()
   Unload Me
End Sub

Private Sub UserForm_Initialize()
   Dim iCounter As Integer
   For iCounter = 1 To 5
      Controls("txt" & iCounter).Text = iCounter
   Next iCounter
End Sub

StandardModule: basMain

Sub CallForm()
   frmPreSet.Show
End Sub