title image


Smiley Re: Inputbox mit mehreren Inputfeldern (w/o Userform) möglich?
Hallo Coolcat,

zu Frage1)

über Inputbox gehts nicht, Userform mit Textboxen wäre die Alternative (siehe Bildchen). Codebeispiel für Eingabesteuerung ohne Plausibilitätsprüfungen der Eingabe:



Private Sub TextBox2_Change()

TextBox2.MaxLength = 2

If TextBox2.TextLength = 2 Then

TextBox3.SetFocus

End If

End Sub



zu Frage 2)

Berücksichtigung des Vorgabewertes bei der Textbox in der Userform:



Private Sub UserForm_Initialize()

TextBox1.SetFocus

TextBox1.Text = CStr(Range("A58").Value)

TextBox1.SetFocus

End Sub



In einer Inputbox siehts z.B. so aus:

Gebdat=Inputbox("Geburtsdatum:","Eingabe des Geburtsdatums:","31.12.1950")

wobei die Argumente - Prompt / Title und Default sind





zu Frage 3)

Nach Aufruf der Inputbox geht die Selektion nicht mehr. Vorher ja:



Private Sub CommandButton2_Click()

Dim gebdat As String

Dim variable As String

variable = Selection.Value

gebdat = InputBox("Ihr Gebdatum:", "Eingabe Geburtsdatum", variable)

End Sub





Viele Grüße

Herby



geschrieben von

Anhang
Bild 9742 zu Artikel 474660

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: