Text markieren, Cursor verschieben

Hallo,
ich möchte mit VBA-Code in einem MemoFeld einen Suchtext markieren (kein Problem)
und danach im gleichen MemoFeld den Cursor verschieben, OHNE dass die Markierung aufgehoben wird. Ist das möglich? Wenn ja, wie?

Es grüßt
Tomte

Hallo,

ich möchte mit VBA-Code in einem MemoFeld einen Suchtext
markieren (kein Problem)
und danach im gleichen MemoFeld den Cursor verschieben, OHNE
dass die Markierung aufgehoben wird. Ist das möglich? Wenn ja,
wie?

Nein …

Der markierte Text IST eben die Schreibmarke (nicht Cursor)

Viele Grüße vom Bodensee
Franz, DF6GL

Hej,
mein Problem ist folgendes: ich ergänze mein MemoFeld-Text per cmdButton an einer definierten Position CursPos um einen Textbaustein.
Zur Verdeutlichung markiere ich diesen hinzugefügten Text anschließend. Nun möchte ich direkt hinter dem Text weiterschreiben.

Beispiel:
CursPos =
meinMemo.Text = meinMemo.Text _
& Textbaustein & meinMemo.Text
meinMemo.SelStart = CursPos
meinMemo.SelLength = Len(Textbaustein)

Nun blinkt der Cursor am Beginn des Textbausteins, nicht wie gewünscht am Ende.
Mit der Tastaturtaste -> (Cursor nach rechts) hebe ich zwar die Markierung auf, aber wenn der Cursor am ENDE des Textbausteins positioniert wäre, könnte ich sofort weiter schreiben.
Was fällt Dir / Euch dazu ein?
Tomte

Hi,
die Textbox für HTMLRTF Format zulassen (Textformat), mittels html den eingefügten text fett/bunt machen und die Einfügemarke mit selpos dann setzen wohin du willst.

Gruss
Joey

Hej Joey,
das hört sich interessant an! Ich finde nur nicht den entsprechenden VBA-Befehl für den selektierten Text.

Bisheriger Code:
CursPos =
meinMemo.Text = meinMemo.Text _
& Textbaustein & meinMemo.Text
meinMemo.SelStart = CursPos
meinMemo.SelLength = Len(Textbaustein)

Wie lautet in VBA „meinMemo.SelektierterText.Farbe=1234“ ?
Gruß
Tomte

Hallo,

vermutlich liegt ein Versions-Irrtum vor.
Ein Textfeld kann erst ab A2007 als RTF/HTML-Typ definiert werden.

Bei A-Versionen

Hej df6gl,
danke!
Meine Version ist (leider) älter.
Tomte