Text aus Kombi-Feld übernehmen
lengaumi
Gesendet: 21.07.13 22:21
Betreff: RE: Text aus Kombi-Feld übernehmen


Member

Beiträge: 17

Karl Donaubauer - 20.07.13 11:12

Hallo, Michael!

lengaumi - 19.07.13
...
Der Cursor wird im Memofeld irgendwo im Text platziert wird, anschließend wird im Kombi irgend ein Textteil ausgewählt.
Dieser sollte sich an der Stelle im Memofeld einfügen, wo vorher der Cursor platziert wurde.
Es ist mir schon klar, dass der Cursor sehr wohl "springt". Also nicht mehr im Memofeld "sitzt".

Irgendwie müsste wohl die Cursorposition im Memofeld abgefragt und zwischengespeichert werden oder?

Könnte der Code der in "Nach Aktualisierung" steht so angepasst werden?
...

Du kannst mal das versuchen:

1. im Ereignis "Beim Verlassen" des Memofeldes

'Cursorposition in die Eigenschaft Marke speichern
Me!Memofeld.Tag = Me!Memofeld.SelStart

2. im Ereignis "Nach Aktualisierung" des Kombinationsfeldes

'Text zusammensetzen mithilfe der gespeicherten Position
Me!Memofeld= Left(Me!Memofeld, Me!Memofeld.Tag) & Me!Kombinationsfeld & Mid(Me!Memofeld, Me!Memofeld.Tag + 1)


Hallo Karl,

Danke mal für diese tolle und einfache Lösung Texte aus dem Kombifeld x-beliebig im Memofeld zu setzen.
Funktioniert soweit super.
Das einzige Problem das aber dabei auftritt ist, wenn Text im Memofeld eingegeben wurde und nun an die letzte Stelle Text aus dem Kombifeld eingefügt werden sollte.
Dieser Text setzt sich dort hin, wo der neue Text begonnen wurde.

Erst nach dem zweiten Mal Cursor positionieren und nochmal Text auswählen passt es.

Kann man das Anfügen von Text am Ende des vorhandenen Textes im Memofeld (aus Frage 1 in diesem Thema) und das x-beliebige Einfügen kombinieren?

Dann wäre meine "Access-Welt" perfekt.

Danke nochmals.
Michael
Top of the page Bottom of the page