Suchen einer Zellreferenz (Microsoft Word)
Wenn Sie mit Tabellen arbeiten, müssen Sie häufig die Referenz einer bestimmten Zelle kennen. Für bestimmte Funktionen oder Felder erwartet Word, dass die Zellreferenz im Spalten- / Zeilenformat angegeben wird, mit dem viele Leser in Excel vertraut sind. Zum Beispiel ist A1 die Zelle oben links, B1 ist eine Zelle rechts und A2 ist eine Zelle unterhalb der ersten Zelle.
Leider gibt es keine inhärente Fähigkeit von Word, Sie über die Referenz einer von Ihnen ausgewählten Zelle zu informieren. Sie können dieses Problem mithilfe eines Makros umgehen. Das folgende Beispielmakro gibt in der Statusleiste die aktuelle Spalte und Zeile zurück, in der sich die Einfügemarke befindet.
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
Wenn Sie das Makro ausführen, werden die angeforderten Informationen in der Statusleiste im folgenden Format angezeigt:
Col:2/Row:1 = B1
Sie sollten beachten, dass das Makro Tabellen mit mehr Dimensionen verarbeitet, die Word nativ verarbeitet. Dies wurde nicht willkürlich gemacht; Programmatisch ist es genauso einfach, die 702. Spalte einer Tabelle (ZZ) zurückzugeben wie die 64. Spalte (BL).
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.
(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (13093) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365. Eine Version dieses Tipps finden Sie für ältere Menüoberfläche von Word hier: