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).
_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 (13093) s’applique à Microsoft Word 2007, 2010, 2013, 2016, 2019 et Word dans Office 365. Vous pouvez trouver une version de cette astuce pour le ancienne interface de menu de Word ici:
link: / word-Finding_a_Cell_Reference [Recherche d’une référence de cellule]
.