質問: 大量のrtfファイルを、word2002の.doc形式にしたい 「word97-2000 & 6.0/95-rtf(*.doc)」で保存された大量のファイルを、現在使用中のword2002で標準の、通常の.docファイルにする方法を探しています。ひとつずつ開いて保存しなおすのは骨が折れるので、よろしくお願いします。
回答: change.vbsという名前でファイルを一個つくって メモ帳で開いて以下を書き込んでください 'ここから set oword=createobject("word.application") set ofs = createobject("scripting.filesystemobject") with oword .visible=true for each argument in wscript.arguments sfilepath = ofs.getparentfoldername(argument) sdocname =sfilepath +"\"+ofs.getbasename(argument)+".doc" if (ucase(ofs.getextensionname(argument))="rtf") then .documents.open(argument) .activedocument.saveas sdocname,0 .activedocument.close end if next .quit end with msgbox("終了しました") 'ここまで そのファイルにrtfのファイルをまとめてドラッグ アンドドロップすれば変更できます。 (最低限のエラー制御しかしてないので完璧な 動作までは保証できないですけど)