docxをtxtに変換する簡単な方法.
ワードの中で,txtでセーブするという動作をマクロ登録し,BATから起動する.
マクロの作り方:「マクロを記録」で作る.
ただし,ファイル名がそのまま入ってしまうので,
FileName = ActiveDocument.Name
SaveName = Mid(FileName, 1, InStrRev(FileName, ".") - 1) & ".txt"
のようにする (某所からのコピーです).また,マクロの最後で
Application.Quit
を実行する.
BATの作り方:上のマクロ名がMacro1とすると,winword.exe /mMacro1 ファイル名
をBATファイルに並べる.