Certamente..quindi un operazione con Split che memorizza le varie righe in un array e poi fai un ciclo for/next per aggiungere le righe del tipo:

codice:
Dim Righe()
Dim TextToPrint As String

'qui metti l'istruzione Split....
    
    For i = 1 To UBound(Righe)
        TextToPrint = TextToPrint & Righe(i) & Space(24)
     Next i
non so se può rispondere alle tue esigenze..

ciao