La maggior parte dei programmi client di posta elettronica, specialmente quelli che utilizzano testo normale invece di HTML, “interrompono” automaticamente ogni riga di posta elettronica a 70 o 72 caratteri. Fortunatamente, in genere non interrompono una riga nel mezzo di una parola, ma lo fanno all’inizio della parola che raggiunge il segno di 70 o 72 caratteri.

Sfortunatamente, questo può avere alcuni effetti negativi sui messaggi di posta elettronica che componi in Word. Alcune delle tue battute, se visualizzate dal destinatario, possono sembrare strane, interrompersi in punti non ottimali e in generale avere un aspetto piuttosto originale. La soluzione, ovviamente, è che tu interrompa ogni riga quando viene raggiunto il punto appropriato sulla linea. In questo modo puoi controllare, in anticipo, come il destinatario vede il tuo messaggio.

È possibile farlo manualmente, se lo si desidera, impostando i margini del messaggio in modo tale che ci siano solo 7 o 7,2 pollici di spazio in orizzontale. Dovresti quindi utilizzare un carattere monospazio a 12 punti, come Courier, per digitare il messaggio. Quando una parola va a capo alla riga successiva, è sufficiente tornare indietro all’inizio della parola e premere il tasto Invio.

Questo potrebbe invecchiare MOLTO MOLTO velocemente, anche se invii solo una quantità moderata di e-mail. La soluzione migliore è consentire a Word di fare le pause per te, ma non sembra esserci una tale capacità in Word. (Puoi impostare le tue opzioni in Outlook o Outlook Express per interrompere automaticamente le righe per te, ma questo non ti dà un controllo così accurato come farlo direttamente in Word.)

Questo ci porta al macro territorio. È possibile utilizzare la seguente macro per esaminare il documento corrente e “spezzettare” automaticamente ogni paragrafo in modo che nessuna riga superi i 70 caratteri.

Sub ChopItUp()

Dim DocThis As Document, docThat As Document     Dim sParRaw As String     Dim iParCount As Integer, iParOut As Integer     Dim J As Long, X As Integer     Dim iLineWidth As Integer     Dim sLeft As String, sRight As String     Dim sTemp As String

iLineWidth = 70

Set DocThis = ActiveDocument     Documents.Add     Set docThat = ActiveDocument     DocThis.Activate

iParCount = DocThis.Paragraphs.Count     iParOut = 0     For J = 1 To iParCount         sParRaw = DocThis.Paragraphs(J).Range.Text         If Right(sParRaw, 1) = Chr(13) Then             sParRaw = Left(sParRaw, Len(sParRaw) - 1)

End If

sRight = sParRaw         If Len(sRight) > iLineWidth Then             While Len(sRight) > iLineWidth                 sLeft = Left(sRight, iLineWidth)

sRight = Mid(sRight, iLineWidth + 1)

flgDoIt = True                 If Left(sRight, 1) = " " Then                     sRight = Mid(sRight, 2)

flgDoIt = False                 End If                 If Right(sLeft, 1) = " " Then                     sLeft = Left(sLeft, Len(sLeft) - 1)

flgDoIt = False                 End If

If flgDoIt Then                     X = InStr(LTrim(sLeft), " ")

If X > 0 Then                         sTemp = ""

While Right(sLeft, 1) <> " "

sTemp = Right(sLeft, 1) & sTemp                             sLeft = Left(sLeft, Len(sLeft) - 1)

If Len(sLeft) = 0 Then                                 sLeft = sTemp & " "

sTemp = ""

End If                         Wend                         sRight = sTemp & sRight                     End If                     sLeft = Trim(sLeft)

End If

docThat.Paragraphs.Add                 docThat.Paragraphs(docThat.Paragraphs.Count).Range = sLeft                 sLeft = ""

sRight = Trim(sRight)

Wend         End If         docThat.Paragraphs.Add         docThat.Paragraphs(docThat.Paragraphs.Count).Range = sRight     Next J End Sub

Quando esegui questa macro, apre un documento nuovo di zecca e copia le informazioni dal vecchio documento ad esso, assicurandosi che ogni riga non sia più lunga di 70 caratteri. Il nuovo documento non conterrà alcuna formattazione. (Dato che stai mettendo insieme messaggi di posta elettronica in testo normale, questo non dovrebbe essere un problema.) Se vuoi una larghezza di linea diversa, tutto ciò che devi fare è cambiare il valore assegnato a iLineWidth nella macro.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

WordTips è la tua fonte di formazione economica su Microsoft Word.

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (1336) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia della barra multifunzione di Word (Word 2007 e più tardi) qui:

Interruzione delle righe nell’e-mail.