Dariusz Polak

Dariusz Polak Warehouse manager,
Cooper Standard
Automotive Polska
Sp. ...

Temat: Przeniesienie tekstu z komórki do Pola tekstowego

Witam

Potrzebuję pomocy.
Tworzę w VBA Useform w którym jest TextBox gdzie wpisuję tekst
Tekst ten jest najczęściej kopiowany z jakiegoś dokumentu i wklejany do TextBox`a

Mam komendę aby tekst ten był umieszczony w komórce Tekst
Range("Tekst").Value = TextBox1

I w osobny arkuszu mam pole tekstowe które pobiera dane z komórki Tekst

Problem polega na tym że kiedy przenosi tekst to wstawia dodatkowy odstęp pomiędzy wierszami tak jakby wstawiał dodatkowy Enter
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Przeniesienie tekstu z komórki do Pola tekstowego

Może to co wklejasz w Textboxa ma niedozwolony znak pochodzący np z HTMLa?
No chyba to pochodzi z Worda, bo tam jest zawijanie w normie.

W twoją komendę można dodać polecenie zamiany znaku na nic albo trimowanie tekstu.

Range("Tekst").Value = trim(replace(TextBox1, vbnewline, " "))
'albo szereg innych wariacji

Sprawdź albo załącz link do pliku z przykładem.



Wyślij zaproszenie do