Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Textfeldinhalt markieren bei Enter

Forumthread: Textfeldinhalt markieren bei Enter

Textfeldinhalt markieren bei Enter
28.01.2004 22:19:46
Michael
Hallo am späten Abend,
Wenn ich ein Textfeld in einem Userform per TAB-Taste aktiviere, wird der bisherige Inhalt markiert.
Wenn ich das Textfeld mit der Maus ansteuere, funktioniert das nicht. Mit dem Ereignis "MouseUp" und dem Code Sendkeys {END}+{HOME} geht das auch.
Leider kann ich dann nicht mehr wie üblich mit einem nochmaligen Klick eine bestimmte Stelle im Textfeldeintrag anwählen, weil immer alles markiert wird.
Das "Enter"-Ereignis tritt beim Mausklick offensichtlich nicht ein.
Weiß jemand Rat, wie ich das gleiche Verhalten wie beim Hingehen per TAB erreichen kann?
Danke!
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textfeldinhalt markieren bei Enter
28.01.2004 22:25:37
Horst
Wenn du links neben den Text klickst, wird alles markiert. Dazu muss
die Eigenschaft SelectionMargin auf True stehen.
Horst
AW: Textfeldinhalt markieren bei Enter
28.01.2004 22:31:54
Michael
Hallo Horst,
vielen Dank für die prompte Antwort.
Leider bringe ich meine Anwender nicht dazu, immer schön links anzuklicken!
Gibt es keine andere Möglichkeit?
Anzeige
AW: Textfeldinhalt markieren bei Enter
28.01.2004 22:38:38
Horst
Das ist aber in anderen Windows- Anwendungen auch nicht anders.
Schau dir mal den anderen Vorschlag an.
Horst
AW: Textfeldinhalt markieren bei Enter
28.01.2004 22:28:41
Josef Ehrensberger
Hallo Michael!
Probier mal das.


Option Explicit
Public first As Boolean
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
first = False
End Sub
Private Sub TextBox1_MouseDown(ByVal Button As IntegerByVal Shift As IntegerByVal As SingleByVal As Single)
If Not first Then
With TextBox1
.SelStart = 0
.SelLength = Len(TextBox1)
End With
first = True
Else
first = False
End If
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß Sepp
Anzeige
AW: Textfeldinhalt markieren bei Enter
28.01.2004 22:42:49
Michael
Vielen Dank Josef!
Das ist die Superlösung!
Danke für die Rückmeldung! o.T.
28.01.2004 22:44:16
Josef Ehrensberger
/
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige