Michael ha un tavolo piuttosto lungo. Una colonna della tabella contiene caratteri di codifica come le lettere c, b, x, ecc. Si chiede se esiste un modo quando stampa la tabella per stampare solo quelle righe che hanno un carattere di codifica specifico nella colonna. Ad esempio, potrebbe voler stampare solo quelle righe che contengono il codice “c” nella colonna di codifica.

Ci sono un paio di approcci che potresti usare per affrontare questo problema.

Forse il metodo più semplice sarebbe copiare la tabella in un foglio di lavoro Excel e quindi filtrare i dati in base ai caratteri nella colonna di codifica. È quindi possibile stampare il foglio di lavoro filtrato e ottenere ciò che si desidera.

Naturalmente, potrebbero esserci momenti in cui lavorare in Excel anziché in Word non è pratico o desiderabile. Ad esempio, potresti non avere Excel o potresti avere esigenze di formattazione che superano ciò che Excel può fornire. In tal caso, potresti semplicemente ordinare la tabella in Word in base al contenuto della colonna di codifica. Quindi, seleziona quelle righe della tabella che contengono il codice che desideri stampare (dovrebbero essere tutte contigue poiché hai ordinato la tabella) e scegli di stampare. Quando si specifica cosa stampare, tuttavia, stampare solo la selezione.

Un altro approccio possibile consiste nell’utilizzare la tabella come origine dati per una stampa unione. Non entrerò nei passaggi esatti da utilizzare durante la progettazione della stampa unione (sono stati trattati in altri Suggerimenti parole_), ma puoi specificare che l’unione includa solo quelli che hanno il carattere desiderato nella colonna di codifica.

Infine, se è necessario eseguire questa stampa selettiva abbastanza spesso, è possibile creare una macro per gestire l’attività. Il modo più semplice per farlo è che la macro crei un nuovo documento e copi le righe desiderate in quel documento.

Sub CopyTableRows()

Dim SourceDoc As Document     Dim r As Row     Dim iCol As Integer     Dim sPCode As String     Dim sTemp As String

iCol = 3        ' Set the coding column     sPCode = "C"    ' Set code to select (must be uppercase)



ScreenRefresh = False

Set SourceDoc = ActiveDocument      ' Get active document's name     Documents.Add       ' Create a new document

' Find all rows that have correct code in the coding column     For Each r In SourceDoc.Tables(1).Rows         sTemp = UCase(r.Cells(iCol).Range)

sTemp = Left(sTemp, Len(sTemp) - 2)     ' Remove cell overhead                  If sTemp = sPCode Then             r.Range.Copy             Selection.PasteAndFormat wdFormatOriginalFormatting         End If     Next r

ScreenRefresh = True End Sub

Per poter utilizzare la macro, devi assicurarti che iCol sia impostato sulla colonna utilizzata come colonna di codifica e che sPCode contenga il codice che desideri scegliere. (Dovrebbe essere tutto maiuscolo.) Quando la macro è terminata, avrai un documento che contiene solo le righe che desideri stampare, e potrai quindi stampare quel documento.

_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 (3511) si applica a Microsoft Word 2007, 2010, 2013 e 2016.