Textbox - SELECT ALL selektiert nicht gesammten Text

Moderator: ModerationP

Textbox - SELECT ALL selektiert nicht gesammten Text

Beitragvon paintitblack3k » 09. Aug 2019, 21:47

Hallo,

ich habe eine Textbox mit dem Namen "Start" und einen dazugehörigen Button mit dem ich den gesamten Text markieren und bei Bedarf kopieren möchte.

Leider wird mit folgendem Code nur der "sichtbare" Text aus der Textbox und kopiert. Wenn die Textbox z.B. 5 Zeilen anzeigen kann und ich 10 Zeilen Text habe, dann werden nur die ersten Zeilen kopiert:
Code: Alles auswählen
Private Sub SelectAllStart_Click()
    Me!Start.SetFocus
    Me.Start.SelStart = 0
    Me.Start.SelLength = Len(Me.Start)
End Sub


Was könnte man ändern, damit der gesamte Text selektiert wird? Wenn ich den Text mit der Maus manuell markiere, dann werden auch alle 10 Zeilen kopiert.

Vielen Dank für eure Hinweise

pib
paintitblack3k
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 78
Registriert: 01. Aug 2018, 16:06

Re: Textbox - SELECT ALL selektiert nicht gesammten Text

Beitragvon knobbi38 » 09. Aug 2019, 22:21

Hallo pib,

der Code kopiert nichts, sondern es werden wie erwartet alle Zeichen in der Textbox selektiert, auch der nicht sichtbare Teil.
Was genau ist dein Problem?

Ulrich
knobbi38
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 1302
Registriert: 02. Jul 2015, 14:23

Re: Textbox - SELECT ALL selektiert nicht gesammten Text

Beitragvon paintitblack3k » 12. Aug 2019, 20:51

Hallo,

ich habe mal in der Beispieldatei
SELECT_ALL.zip
den Text aus der Datei
Input.txt
(20 Zeilen) in das Formular eingeben, dann die o.g. Funktion gestartet und mit STRG + C den selektierten Text kopiert und im Ergebnis sind "nur" 11 Zeilen (
Output.txt
) enthalten.

Ist das bei dir genau so?

Viele Grüße

pib
Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.
paintitblack3k
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 78
Registriert: 01. Aug 2018, 16:06

Re: Textbox - SELECT ALL selektiert nicht gesammten Text

Beitragvon SGast » 12. Aug 2019, 22:11

Hallo,
versuch es mal so:
Code: Alles auswählen
Me.Start.SelLength = Len(Me.Start.Text)


Gruß Steffen
SGast
 

Re: Textbox - SELECT ALL selektiert nicht gesammten Text

Beitragvon knobbi38 » 13. Aug 2019, 01:43

Hallo pib,
ich kann das Problem mit ACC2010 nachvollziehen. Man kann zwar mit "F2" alles markieren und dann mit Ctrl+C alles kopieren aber mit VBA und .SelStart,.SelLength und/oder .SelText ist es mit nicht gelungen, den gesamten Text adäquat zu selektieren.

Auch gibt es einen BUG bezüglich SelText zumindest bis ACC2010, das SelText max. 128 Zeichen zurückliefert. SelText returns no more than 128 chars

Du müsstest also eine andere Vorgehensweise wählen, z.B. ein Workaround mit .SelStart, .SelLength, Mid() und einem Button, der den ausgewählten Text direkt in die Zwischenablage kopiert.

Gruß Ulrich
knobbi38
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 1302
Registriert: 02. Jul 2015, 14:23

Re: Textbox - SELECT ALL selektiert nicht gesammten Text

Beitragvon paintitblack3k » 13. Aug 2019, 20:55

Damit funktioniert es auf den ersten Blick. Ich habe es mit 158 Zeilen getestet und 158 Zeilen zurück erhalten:
SGast hat geschrieben:Hallo,
versuch es mal so:
Code: Alles auswählen
Me.Start.SelLength = Len(Me.Start.Text)


Gruß Steffen


Vielen Dank für die Hilfe

pib
paintitblack3k
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 78
Registriert: 01. Aug 2018, 16:06


Zurück zu Access Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 10 Gäste