VBA-Userform, textbox-default-Wert und hervorgehoben

In meiner UserForm möchte ich ein default-Wert für mein Textfeld, das hervorgehoben wird, wenn fokussiert.

Private Sub UserForm_Initialize()

NameTextBox.Value = "Your Name Here"

NameTextBox.SetFocus

End Sub

Wenn dieser code ausgeführt wird, der cursor sollte am Ende der Standard-text, also nach "...Hier". Ich will "Dein Name Hier" hervorgehoben werden, so dass, wenn das Formular erzeugt wird, kann der Benutzer starten Sie das ersetzen, die Standard - /Platzhalter-text.

Können Sie mir helfen, schreiben Sie code zum festlegen von Standardwerten, die bearbeitbar sind?

InformationsquelleAutor blahblahblah | 2014-01-15

  1. 11

    Dies wird markieren Sie alle den text in der TextBox:

    Private Sub UserForm_Initialize()
With Me.NameTextBox
    .Value = "Your Name Here"
    .SetFocus
    .SelStart = 0
    .SelLength = Len(.Text)
End With
End Sub

    InformationsquelleAutor Doug Glancy

  2. 0

    Legen Sie die EnterFieldBehavior Eigenschaft frmEnterFieldBehaviorSelectAll so, dass, wenn der Fokus geht auf das Feld, wird das gesamte Feld ausgewählt ist.

    InformationsquelleAutor MBGtips

  3. -4

    wie wäre es mit dieser Zeile code, die, wenn Sie Ihre form lädt?

    NameTextBox.SelectAll()
    Wenn ich hinzufügen, dass wenig code die Letzte Zeile bekomme ich einen Compile Error: Expected: =
    Was ist der Fehler???
    bfs1990 gesagt, was der Fehler ist. Um genauer zu sein in einer Userform-Textbox hat keine "SelectAll" - Methode. Ich downvoted diese Antwort.
    ah sorry für die Verwirrung. Ich nahm an, dass das Textfeld verwendet wurde, war in das System.Windows.Forms-namespace. link

    InformationsquelleAutor nabinchha

Schreibe einen Kommentar