フィールドを自動的に更新する参考

For Each aStory In ActiveDocument.StoryRanges
aStory.Fields.Update
Next aStory

GetOpeFilename が Word にはないので、
Excelを利用するらしい。

Sub test()
Dim varFile As Variant
With CreateObject("Excel.application")
varFile = .GetOpenFilename(FileFilter:="Wordファイル,*.doc", MultiSelect:=True)
End With
End Sub

埋め込みオブジェクトを図に変換する
Ctrl + Shift + F9
いつも忘れてしまうのでメモ。

小文字と大文字を切り替えるショートカット
Shift + F3
こういうのすぐ忘れるからφ(.. )

次のようなレ点やチェック印を書きたい場合。

[挿入]→[記号と特殊文字]を選択、フォントを「Windings」か「Windings 2」にする。

文字数を数える場合は、[ツール]→[文字カウント]
もちろん、範囲選択してから実行すれば、その範囲だけ数えることができる。
便利～♪