Herbers Excel-Forum - das Archiv

Userform - Anzeigen einer Variablen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Label TextBox UserForm InputBox
Bild

Betrifft: Userform - Anzeigen einer Variablen
von: Mikaelito

Geschrieben am: 15.02.2005 17:28:03
Hallo Leute,
ich möchte in einer UF den Wert einer Variablen "nur zu Info" anzeigen lassen damit beim Füllen des UFs weniger Fehler gemacht werden. Deshalb ist MsgBox keine Option für mich.
Wie sieht meine UF aus?
Sub Eingabe()
Dim Eing As String
Eing = InputBox("Ihre Eingabe: ")
UserForm1.Show ' und hier die Anzeige von Eing !!!
End Sub

Vielen Dank!
Mikaelito
Bild

Betrifft: AW: Userform - Anzeigen einer Variablen
von: Matthias G
Geschrieben am: 15.02.2005 17:40:05
Hallo Mikaelito,
du könntest im UserForm-Codemodul eine alternative Show-Prozedur erstellen:
Sub Show2(text As String)
Label1.Caption = text
Me.Show
End Sub
Der Aufruf ginge dann mit
UserForm1.Show2 Eing
Gruß Matthias
Bild

Betrifft: AW: Userform - Anzeigen einer Variablen
von: Mikaelito
Geschrieben am: 15.02.2005 18:46:52
Danke, funktioniert beides!
Gruß,
Mikaelito
Bild

Betrifft: AW: Userform - Anzeigen einer Variablen
von: Nepumuk

Geschrieben am: 15.02.2005 17:42:41
Hallo Mikaelito,
worin willst du die Variable anzeigen lassen, Label, Textbox, ....?
Beispiel für ein Label:


Sub Eingabe()
    Dim Eing As String
    Eing = InputBox("Ihre Eingabe: ")
    With UserForm1
        .Label1.Caption = Eing
        .Show
    End With
End Sub


Gruß
Nepumuk
Bild

Betrifft: AW: Userform - Anzeigen einer Variablen
von: Mikaelito
Geschrieben am: 15.02.2005 18:49:18
Danke schön!
Anzeige im Label, aber hauptsache Prinzip verstanden ;-)
Gruß,
Mikaelito
 Bild
Excel-Beispiele zum Thema "Userform - Anzeigen einer Variablen"
Diagramm in Userform XL-Dateien in UserForm listen
UserForm an Excel-Fenster anpassen Fundstellen in UserForm listen
Module und UserForms austauschen In einer Schleife auf Elemente einer UserForm zugreifen
Werte in eine ComboBox einer UserForm übernehmen Zellinhalt als Label-Aufschrift in UserForm
Alle CheckBoxes einer UserForm ansprechen Wenn kein Eintrag, UserForm nicht schließen