セル参照の検索(Microsoft Word)
テーブルを操作するときは、特定のセルの参照を知る必要があることがよくあります。特定の関数またはフィールドの場合、Wordは、多くの読者がExcelで使い慣れている列/行形式を使用してセル参照が指定されることを想定しています。たとえば、A1は左上のセル、B1は右に1つのセル、A2は最初のセルの1つ下のセルです。
残念ながら、選択したセルの参照を通知するWordの固有の機能はありません。この問題は、マクロを使用して回避できます。次のサンプルマクロは、ステータスバーに、挿入ポイントが配置されている現在の列と行を返します。
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
マクロを実行すると、要求された情報がステータスバーに次の形式で表示されます。
Col:2/Row:1 = B1
マクロは、Wordがネイティブに処理するよりも多くのディメンションを持つテーブルを処理することに注意してください。これは恣意的に行われたのではありません。プログラムでは、テーブルの702番目の列(ZZ)を返すのは、64番目の列(BL)を返すのと同じくらい簡単です。 (Wordはテーブル内の64列のみに制限されています。)
まだWord97を使用している場合は、別の方法があることを知っておく必要があります。 Microsoftは親切にも、必要に応じて使用できるマクロを含めることができました。このマクロはTableCellHelperと呼ばれ、元のWord 97(またはOffice 97)CD-ROMで提供されているMacros8.dotテンプレートに含まれています。すでにシステムにインストールされている場合もあります。 Windowsの検索機能を使用してファイルを検索し、Wordのオーガナイザーを使用してTableCellHelperをNormal.dotテンプレートに転送できます。
TableCellHelperを実行すると、標準ツールバーにインストールされます。挿入ポインタをテーブルセルに配置してからマクロを実行すると、現在のセルのセル参照とテーブル全体のサイズを示すメッセージボックスが表示されます。
注:
このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
link:/ wordribbon-WordTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]
。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(1358)は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス(Word 2007)用のこのヒントのバージョンを見つけることができます。以降)ここ:
link:/ wordribbon-Finding_a_Cell_Reference [セル参照の検索]
。