Thema: Memory für TextBox-Wert

Home

Abbildung - Memory für TextBox-Wert

Prozedur: CallForm
Art: Sub
Modul: Standardmodul
Zweck: Variable in TextBox eintragen
Ablaufbeschreibung:
- Public-Variable für TextBox-Wert deklarieren
- UserForm aufrufen
- Rahmen um den UserForm-Designer bildern
- Variable in TextBox eintragen

Code:


Public gvar As Variant

Sub CallForm()
   frmSetValue.Show
   With ThisWorkbook.VBProject _
      .VBComponents("frmSetValue").Designer
      .Controls("txtA").Value = gvar
   End With
End Sub

Prozedur: cmdCancel_Click
Art: Ereignis
Modul: Klassenmodul der UserForm
Zweck: TextBox-Wert an Variable übergeben
Ablaufbeschreibung:
- TextBox-Wert an Variable übergeben
- UserForm schließen

Code:


Private Sub cmdCancel_Click()
   gvar = txtB.Text
   Unload Me
End Sub