【Word VBA】KWIC Finderを操作するWordマクロ

2013年3月28日

「過去の翻訳資産の活用」ってよく言われています。

翻訳メモリはその方法として有名です。

今日は、翻訳手法として翻訳メモリを使わない人でも、過去の翻訳資産を活用できるヒントを紹介します。

KWIC FinderとWordとの連携です。

KWIC Finderについては、かつて紹介したことがありました。

KWIC Finder 過去案件の有効活用（シェアウェア紹介）

KWIC Finderとは、ファイル内のテキストの串刺し検索ツールです。Grep検索と呼ばれる機能ですね。

テキストエディタソフトとして有名な秀丸についていますね。秀丸ではGrep検索の対象がテキストファイルに限定されています.

KWIC Finderでは、ファイルの種類を拡張して検索できます。Word文書だけではなく、ExcelやPowerPoint、PDFなども対象にできます。スゴイです。

非常に便利なツールです。デスクトップだけではなく、サーバー上のファイルも検索対象にします。

そのようなわけで、このKWIC FinderをもっとWordから活用するためのマクロです。

このマクロでできること

Wordで選択した文字列に対して、KWIC Finderで検索をして結果を表示します。

Google検索用のマクロのような感じですね。

ファイル名、ファイルの種類を指定した検索ができます。

マクロの解説

8行目に、KWIC Finderのアプリケーションのパスが記載されています。

これは、みなさんのパソコンによって異なります。探し方は、、、今回は書きませんがいずれ紹介します。

Program Files のフォルダに入っています。

11行目で、検索の設定をします。

ここを工夫すると、ファイルの種類、ファイル名を設定できます。

現在の設定では、ファイル名に「_EJ」を含み、ファイルの拡張子は、「.dot」や「.dotx」であるファイルを指定して検索できます。

つまり、私は、「○○○_EJ.doc」として英日翻訳の過去ファイルを保存しています。よって、このファイルを対象にして検索がなされるわけです。

このあたりは過去ファイルの保存方法（保存名、保存場所もいろいろですね）によって工夫したらいいかと思います。

なお、フォルダの指定は、KWIC Finderでします。

また、多重起動がされないように設定するといいと思います。この設定をしないと、複数のKWIC Finderが開いてしまいます。

[設定] メニュー　→　[オプション]　→　[環境] タブ　で設定画面が開きます。

設定方法はこちら 。

マクロ


Sub KWIC_Finder_EJ()

　Dim KWIC As String
　Dim myKWICPath As String
　Dim SearchWord As String
　
　'KWIC Finderのアプリケーションの保存先
　myKWICPath = "C:\Program Files (x86)\kwic\kwic.exe"
　
　'英日ファイルの検索
　KWIC = myKWICPath & " /pat=*.doc;*.docx /name=_EJ /search="
　
　'文字列の選択
　If Selection.Type = wdSelectionIP Then
　　SearchWord = ""
　Else
　　SearchWord = Selection.Text
　End If
　
　'KWIC Finderの起動
　Shell KWIC + """" + SearchWord + """"
　
End Sub

関連記事

KWIC Finder 過去案件の有効活用（シェアウェア紹介）

コメント

 

  • 2. Re:無題

    ＞Sakinoさん

    コメントをどうもありがとうございました。
    新しいマシンがどんどんパワーアップしていきますね。楽しみですね。

    私も、KWIC Finderは便利で使っています。過去案件を見るときには便利ですよね。

    確かに、辞書を引くような感覚ですね。
    ヒントをいただきありがとうございます！

    新田順也☆ワードプログラマー 返信する

  • 1. 無題

    新しいマシンにして、パワーアップしたので、（色の移行でうろうろしたのは別として）、楽しみにしていたこのマクロをまず最初に導入しました。過去のジョブを「調べる」「チェックする」でなく、辞書代わりにどんどん「引ける」のは、ほんとうにありがたいことです。……手間をかけて損をした的な感覚なしに「あ、やっぱりこの語彙・表現って使ったことがないんだ」「えぇっ、すっかり忘れてたじゃん」というようなものも手軽に確認できるようになりました。

    ありがとうございます。

    Sakino

 

-コード
-