Wordで.doc形式のファイルを.docxにバッチ変換する方法は?
97-2003形式のWord文書を受け取ったとすると、これらすべての.doc形式の文書を一度に.docx形式にバッチ変換するにはどうすればよいでしょうか。 この記事では、この問題を解決するXNUMXつの方法を紹介します。
.doc形式のファイルをVBAコードを使用して.docxにバッチ変換します
Kutools for Wordを使用して、.doc形式のファイルを.docxにバッチ変換します
.doc形式のファイルをVBAコードを使用して.docxにバッチ変換します
このセクションでは、指定したフォルダー内のすべての.doc形式のドキュメントを一度に.docxドキュメントに変換するVBAコードについて説明します。 次のようにしてください。
1.指定したフォルダに.docxに変換するすべての.doc形式のドキュメントを収集してください。
2。 プレス 他の + F11 キーを開く アプリケーション向け Microsoft Visual Basic 窓。
3.ウィンドウで、をクリックします インセット > モジュール。 次に、以下のVBAコードをモジュールウィンドウにコピーします。
VBAコード:特定のフォルダー内のすべての.doc形式のドキュメントを.docxにバッチ変換します
Sub ConvertDocToDocx()
'Updated by ExtendOffice 20181128
Dim xDlg As FileDialog
Dim xFolder As Variant
Dim xFileName As String
Application.ScreenUpdating = False
Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
If xDlg.Show <> -1 Then Exit Sub
xFolder = xDlg.SelectedItems(1) + "\"
xFileName = Dir(xFolder & "*.doc", vbNormal)
While xFileName <> ""
Documents.Open FileName:=xFolder & xFileName, _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto, XMLTransform:=""
ActiveDocument.SaveAs xFolder & Replace(xFileName, "doc", "docx"), wdFormatDocumentDefault
ActiveDocument.Close
xFileName = Dir()
Wend
Application.ScreenUpdating = True
End Sub
4。 プレス F5 コードを実行するためのキー。 オープニングで ブラウズ ウィンドウで、.doc形式のドキュメントが含まれているフォルダを選択してクリックします OK。 スクリーンショットを参照してください:
次に、以下のスクリーンショットに示すように、すべての.doc形式のドキュメントがすぐに.docxドキュメントに変換されます。
Kutools for Wordを使用して、.doc形式のファイルを.docxにバッチ変換します
このセクションでは、便利なユーティリティをお勧めします。 とともに Doc / Docx の有用性 Kutools for Word、フォルダ内のすべての.doc形式のドキュメントを.docxドキュメントに簡単に変換できます。 次のようにしてみてください。
1.指定したフォルダにすべての.doc形式のドキュメントを収集してから、をクリックしてください クツールズプラス > Doc / Docx。 スクリーンショットを参照してください:
2。 の中に ドキュメントフォーマットコンバーター ダイアログボックスでは、次のようにする必要があります。
3.次に、正常に変換されたドキュメントの数を示すダイアログボックスが表示されたら、[ OK ボタンを押して閉じます ドキュメントフォーマットコンバーター 窓。
これで、すべての.doc形式のドキュメントが.docxファイルに変換されます。 スクリーンショットを参照してください:
このユーティリティの無料トライアルをご希望の場合は、 ソフトウェアを無料でダウンロード まず、上記の手順に従って操作を適用します。
最高のオフィス生産性向上ツール
Kutools for Word - Over で単語体験を向上させましょう 100 注目すべき機能!
🤖 Kutools AIの機能: コンテンツを生成する / テキストを書き換える / ドキュメントに関するQ&A / すぐに回答を得る / ドキュメントを翻訳する / ポーランド語文書(保存形式)...
📘 ドキュメントマスタリー: 分割ページ / ドキュメントをマージする / 選択内容をさまざまな形式でエクスポート (PDF/TXT/DOC/HTML...) / PDFへの一括変換...
✏ コンテンツ編集: 複数のファイルにわたるバッチ検索と置換 / すべての画像のサイズを変更する / テーブルの行と列を転置する / 表をテキストに変換...
🧹 楽にお掃除: 掃き捨てる 余分なスペース / セクションブレーク / テキストボックス / ハイパーリンク / その他の取り外しツールについては、 削除します グループ...
➕ クリエイティブインサート:挿入 千の区切り文字 / チェックボックス / ラジオボタン / QRコード / バーコード / 複数の写真 / 詳細はこちら インセット グループ...
🔍 正確な選択: ピンポイント 特定のページ / テーブル類 / 形状 / 見出し段落 / ナビゲーションを強化する 他には? 選択 機能を使用...
⭐ スターの強化: 任意の場所に移動 / 繰り返しテキストの自動挿入 / ドキュメントウィンドウ間の切り替え / 11 変換 ツール...
最高のオフィス生産性向上ツール
Kutools for Word - Word 用の 100 以上のツール
- 🤖 Kutools AIの機能: 生成する, リライト, まとめる, 翻訳します ドキュメント / すぐに回答を得る / ポーランド語文書(保存形式)
- 📘 ドキュメントマスタリー: 分割ページ / ドキュメントをマージする / PDFへの一括変換
- ✏ コンテンツ編集: バッチ検索と置換 / すべての画像のサイズを変更する
- 🧹 楽にお掃除: 余分なスペースを削除する / セクション区切りを削除する
- ➕ クリエイティブインサート: 千単位区切り記号を挿入 / チェックボックスを挿入する / QRコードを作成する