Tema: Text wraperis VBA
Autorius: Zv
Data: 2011-01-26 15:02:37
Sveiki,
yra csv failas kurio formatas toks:

Failo pradzia

Headeris1;
Headeris2;
Headeris3;

Stulpelio_pavadinimas1;Stulpelio_pavadinimas2;Stulpelio_pavadinimas3;Stulpelio_pavadinimas_n;
Reiksme;Reiksme;Reiksme;Reiksme_n;
Reiksme;Reiksme;Reiksme;Reiksme_n;

Reiksme;Reiksme;Rei(bendras eilutes ilgis 600 simboliu)
ksme;Reiskme_n;
Reiksme;Reiksme;Reiksme;Reiksme_n;
Reiksme;Reiksme;Reiksme;Reiksme_n;


Failo pabaiga

Eilutes atskirtos CRLF

Problema ta, kad jei simboliu skaicius eiluteje virsyja 600 simboliu, 
eilutes pabaigoje rasomas CRLF, o sekancioje eiluteje surasomi pries tai 
esanciai eilutei priklausantys duomenys, kuriu pabaigoje irgi yra CRLF. 
Sioje nukeltoje eiluteje simboliu nebuna daugiau nei 100.

Reikia kazkoki text wraperi susikurti, kuris sujungtu eilutes, kurios 
yra taip "dirbtinai" nukeltos.

Kartu tarp duomenu eiluciu yra tusciu eiluciu, kuriu taip pat reikia 
atsikratyti, bet cia manau bus lengviau isspresti.

Duomenys bus apdorojami vartotojo kompiuteryje Windows XP su Microsoft 
Excel 2003.

Gal kas uzvestu ant kelio kaip su VBA toki text wraperi susikurpti?

Zv