Hai lavorato a lungo e duramente sul design della tua pagina, comprese un paio di tabelle che sono giuste. Quindi, arriva la necessità di aggiungere un po ‘più di testo in una delle tabelle. Il risultato è che il testo in una cella si avvolge e spinge un po ‘tutto il resto verso il basso. Ora tutto il tuo design è stato buttato via! Desideri ardentemente un modo per regolare automaticamente la dimensione del testo in una cella in modo da non avere il wrapping e la spinta.

Se si utilizza Word 2000, Word 2002 o Word 2003, è disponibile un’opzione incorporata che potrebbe risolvere il problema. Segui semplicemente questi passaggi:

  1. Seleziona la cella o le celle che desideri formattare.

  2. Scegli Proprietà tabella dal menu Tabella. Viene visualizzata la finestra di dialogo Proprietà tabella.

  3. Se necessario, seleziona la scheda Cella. (Vedi figura 1.)

  4. Fare clic sul pulsante Opzioni. Word visualizza la finestra di dialogo Opzioni cella. (Vedi figura 2.)

  5. Assicurati che la casella di controllo Adatta testo sia selezionata.

  6. Fare clic su OK per chiudere la finestra di dialogo Opzioni cella.

  7. Fare clic su OK per chiudere la finestra di dialogo Proprietà tabella.

Quello che fa Word è diminuire la dimensione apparente del testo in modo che tutto si adatti. Word riduce la larghezza del testo “accartocciando” (un termine altamente tecnico) il testo insieme orizzontalmente, senza regolarlo verticalmente.

Se si utilizza Word 97, non esiste alcun modo intrinseco per eseguire l’attività. Word non fornisce alcuna proprietà che è possibile controllare per determinare la larghezza di vari caratteri, ognuno dei quali può avere dimensioni diverse e avere altri attributi. Tuttavia, puoi creare una macro che possa aiutarti visualizzando la larghezza di una stringa di testo in punti o pollici. Ad esempio, la seguente macro VBA visualizza una casella di input in modo da poter inserire la stringa, visualizza la finestra di dialogo Carattere in modo da poter specificare il carattere e la dimensione in punti, quindi visualizza la larghezza della stringa risultante.

Sub GetStringLength()

Dim sngInitPos As Single     Dim sngEndPos As Single     Dim strText As String     Dim sngLength As Single

strText = InputBox("Enter the string whose length you want to determine")

Documents.Add     Dialogs(wdDialogFormatFont).Show

sngInitPos = Selection.Information(wdHorizontalPositionRelativeToPage)

Selection.InsertAfter strText     Selection.EndOf     sngEndPos = Selection.Information(wdHorizontalPositionRelativeToPage)

sngLength = sngEndPos — sngInitPos

MsgBox "Your string has a length of " & sngLength & _         " points, or " & PointsToInches(sngLength) & " inches."

ActiveDocument.Close savechanges:=False End Sub

L’unica difficoltà con questa macro, ovviamente, è che non è “automatica”. Ad esempio, non adatterà la dimensione di una stringa di testo alla dimensione massima possibile per adattarsi a una cella. A lungo termine potrebbe essere più semplice sperimentare con diverse dimensioni dei caratteri per le informazioni nella cella finché non trovi la dimensione giusta per le tue esigenze.

_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 (3780) 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:

Fitting Text Into Cells.