Formattare testo

[alex.alex]

E' possibile formattare un paragrafo eliminando gli spazi bianchi finali.
Mi spiego: scrivo un articolo formato da più paragrafi quindi tra le singole frasi ci sono apszi bianchi che vanno lasciati e che nella pagina verranno sostitiuti con dei
( credo due)

Ma alla fine , quando l'articolo è finito, rimangono a volte molti spazi vuoti che allungano troppo la pagina e distanziano troppo l'articolo dalla firma finale di chi l'ha scritto.

Di fatto la struttura è simile al presente scritto: io ho trovato a fare Trim(rs("testo")) e RTrim(rs("testo")), ma nessuno spazio viene eliminato.
Come posso fare?


grazie

[mcviper909]

Se trim non funge prova a fare un Replace...
una cosa tipo:

Replace(miastringa, " ", "")

Ciao

[alex.alex]

assolutamente no
se faccio così toglie tutti gli spazi alla frase e le parole si appiccicano una con l'altra

grazie, ma non funziona

[thegizmo]

Aspetta, se ci sono molti spazi probabilmente è perché alla fine ti ritrovi enne
, è così? se è così devi fare una funzione che ti cancelli tutti i
finali

[alex.alex]

esatto è così
ma come faccio a fare questa funzione?
Devo prima dirgli di arrivare alla fine , ed ho già provato con last e non funziona e poi come faccio a calcolare gli n

Con un array?
Solo che non riesco capire come

grazie

[alex.alex]

se può essere d'aiuto a qualcun'altro ho risolto così

Function TogliSpazi(strTxt)
     Set RegEx = New RegExp
     RegEx.Global = True 
     RegEx.IgnoreCase = True
     RegEx.Pattern = "\s{3,}"
     TogliSpazi = RegEx.Replace(strTxt,"

")
     set RegEx = nothing
End function

testo=TogliSpazi(testo)

in questo modo quando trova più di 3 spazi bianchi li sostituisce con



I paragrafi rimangono inalterati ed in fondo lascia

utili per staccare il testo dell'articolo dalla firma