Michael a une table assez longue. Une colonne du tableau contient des caractères de codage tels que les lettres c, b, x, etc. Il se demande s’il y a un moyen quand il imprime le tableau de n’imprimer que les lignes qui ont un caractère de codage spécifique dans la colonne. Par exemple, il peut vouloir imprimer uniquement les lignes qui contiennent le code «c» dans la colonne de codage.

Vous pouvez utiliser plusieurs approches pour résoudre ce problème.

La méthode la plus simple serait peut-être de copier le tableau dans une feuille de calcul Excel, puis de filtrer les données en fonction des caractères de la colonne de codage. Vous pouvez ensuite imprimer la feuille de calcul filtrée et avoir exactement ce que vous voulez.

Bien sûr, il peut y avoir des moments où travailler dans Excel au lieu de Word n’est pas pratique ou souhaitable. Par exemple, vous n’avez peut-être pas Excel ou vos besoins de mise en forme dépassent ce que peut fournir Excel. Dans ce cas, vous pouvez simplement trier votre tableau dans Word en fonction du contenu de la colonne de codage. Ensuite, sélectionnez les lignes du tableau qui contiennent le code que vous souhaitez imprimer (elles doivent toutes être contiguës depuis que vous avez trié le tableau) et choisissez d’imprimer. Cependant, lorsque vous spécifiez les éléments à imprimer, n’imprimez que la sélection.

Une autre approche possible consiste à utiliser votre table comme source de données pour un publipostage. Je n’entrerai pas dans les étapes exactes à utiliser lors de la conception du publipostage (elles ont été couvertes dans d’autres WordTips), mais vous pouvez spécifier que la fusion n’inclut que ceux qui ont le caractère souhaité dans la colonne de codage.

Enfin, si vous devez effectuer cette impression sélective assez souvent, vous souhaiterez peut-être créer une macro pour gérer la tâche. La manière la plus simple de procéder consiste à ce que la macro crée un nouveau document et copie les lignes souhaitées dans ce document.

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

Pour utiliser la macro, vous devez vous assurer qu’iCol est défini sur la colonne utilisée comme colonne de codage et que sPCode contient le code que vous souhaitez choisir. (Tout doit être en majuscules.) Lorsque la macro est terminée, vous aurez un document qui contient uniquement les lignes que vous souhaitez imprimer, et vous pouvez ensuite imprimer ce document.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites WordTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / wordribbon-WordTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (3511) s’applique à Microsoft Word 2007, 2010, 2013 et 2016.