Recherche d’une référence de cellule (Microsoft Word)
Lorsque vous travaillez avec des tableaux, vous avez souvent besoin de connaître la référence d’une cellule particulière. Pour certaines fonctions ou champs, Word s’attend à ce que la référence de cellule soit spécifiée à l’aide du format Colonne / Ligne que de nombreux lecteurs connaissent dans Excel. Par exemple, A1 est la cellule en haut à gauche, B1 est une cellule à droite et A2 est une cellule en dessous de la première cellule.
Malheureusement, il n’y a pas de capacité inhérente à Word pour vous informer de la référence d’une cellule que vous avez sélectionnée. Vous pouvez contourner ce problème en utilisant une macro. L’exemple de macro suivant renverra, dans la barre d’état, la colonne et la ligne actuelles dans lesquelles se trouve le point d’insertion.
Sub CellRef() Const clngAOffset As Long = 64 ' Word's maximum columns is 64, but this procedure ' can cope up to clngMaxCols columns Const clngMaxCols As Long = 702 Dim lngRow As Long, lngCol As Long Dim strCol As String ' See if in table If Selection.Information(wdWithInTable) Then ' Get column and row numbers lngCol = Selection.Information(wdStartOfRangeColumnNumber) lngRow = Selection.Information(wdStartOfRangeRowNumber) ' Convert column number to letter Select Case lngCol Case Is < 27 ' Single character column reference strCol = Chr$(clngAOffset + lngCol) Case Is > clngMaxCols MsgBox "Table is too big" Exit Sub Case Else ' Two-character column reference strCol = Chr$(clngAOffset + Fix((lngCol - 1) / 26)) strCol = strCol & Chr$(CLng(clngAOffset + 1 _ + ((lngCol - 1) Mod 26))) End Select ' Show column, row, and cell reference in status bar StatusBar = "Col:" & lngCol & "/Row:" & lngRow _ & " = Cellref: " & strCol & CStr(lngRow) End If End Sub
Lorsque vous exécutez la macro, elle affiche les informations demandées dans la barre d’état au format suivant:
Col:2/Row:1 = B1
Vous devez noter que la macro gérera les tables qui ont plus de dimensions que Word gérera en mode natif. Cela n’a pas été fait arbitrairement; par programme, il est tout aussi facile de renvoyer la 702e colonne d’une table (ZZ) que de renvoyer la 64e colonne (BL). (Word est limité à seulement 64 colonnes dans un tableau.)
Si vous utilisez toujours Word 97, vous devez savoir qu’il existe une approche différente que vous pouvez adopter. Microsoft a eu la gentillesse d’inclure une macro que vous pouvez utiliser, si vous le souhaitez. Cette macro s’appelle TableCellHelper et se trouve dans le modèle Macros8.dot fourni sur votre CD-ROM Word 97 (ou Office 97) d’origine. Il peut même être déjà installé sur votre système; vous pouvez utiliser la fonctionnalité Rechercher de Windows pour localiser le fichier, puis utiliser l’Organisateur de Word pour transférer TableCellHelper vers votre modèle Normal.dot.
Lorsque vous exécutez TableCellHelper, il s’installe sur la barre d’outils standard. Lorsque vous placez le pointeur d’insertion dans une cellule de tableau, puis exécutez la macro, il affiche une boîte de message qui affiche la référence de cellule de la cellule actuelle, ainsi que la taille globale du tableau.
_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 (1358) s’applique à Microsoft Word 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban de Word (Word 2007 et plus tard) ici:
link: / wordribbon-Finding_a_Cell_Reference [Recherche d’une référence de cellule]
.