I codici di campo possono essere molto utili in un documento. Ad un certo punto, potresti voler condividere un codice di campo con qualcuno. Forse stai preparando un documento di formazione che deve mostrare i codici come testo o desideri inviare il codice di campo tramite posta elettronica a qualcun altro.

Il problema è che se copi e incolli semplicemente il codice di campo, non è il codice effettivo che viene incollato; è il risultato di quel codice di campo. È possibile, ovviamente, visualizzare il codice del campo (Maiusc + F9), posizionare il punto di inserimento tra parentesi graffe, selezionare attentamente tutti i caratteri tranne la parentesi graffa di chiusura e quindi copiare negli Appunti.

Tuttavia, questo approccio può diventare noioso in gran fretta. Un approccio migliore consiste nell’usare una macro per visualizzare il codice di campo e inserire le informazioni desiderate negli Appunti. La seguente macro fa proprio questo:

Sub StuffFieldCode()

Dim sField As String     Dim sTextCode As String     Dim bSFC As Boolean     Dim MyData As DataObject     Dim sTemp As String     Dim J As Integer

Application.ScreenUpdating = False

If Selection.Fields.Count = 1 Then         bSFC = Selection.Fields.Item(1).ShowCodes         Selection.Fields.Item(1).ShowCodes = True         sField = Selection.Text         sTextCode = ""

For J = 1 To Len(sField)

sTemp = Mid(sField, J, 1)

Select Case sTemp                 Case Chr(19)

sTemp = "{"

Case Chr(21)

sTemp = "}"

Case vbCr                     sTemp = ""

End Select             sTextCode = sTextCode & sTemp         Next J

Set MyData = New DataObject         MyData.SetText sTextCode         MyData.PutInClipboard                  Selection.Fields.Item(1).ShowCodes = bSFC     End If

Application.ScreenUpdating = True End Sub

La macro inizia disattivando l’aggiornamento dello schermo, quindi verifica che la selezione includa un solo campo. (È necessario selezionare il campo desiderato prima di eseguire la macro.) Se contiene un singolo campo, viene visualizzato il codice di campo per quel campo, assegnato a una variabile (sField) e quindi separato carattere per carattere. Se il carattere in esame è la parentesi graffa del campo di apertura, Chr (19), viene sostituito con una parentesi graffa di apertura regolare. Se è una parentesi graffa di chiusura del campo, Chr (21), viene sostituita con una normale parentesi graffa di chiusura. Infine, se il carattere è un marcatore di fine paragrafo (vbCr), il carattere viene ignorato.

Infine, il metodo PutInClipboard viene utilizzato per inserire la versione di testo del codice di campo negli Appunti. È quindi possibile utilizzare un normale comando Incolla (Ctrl + V) per incollare il codice di campo in un documento, in un’e-mail o in un altro programma.

_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 (3844) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia a nastro di Word (Word 2007 e più tardi) qui:

Copiare e incollare i codici di campo.