(license)みなさん、こんにちは!タカハシ(@ntakahashi0505)です。エクセルVBAでWord文書の操作をする方法についてお伝えしています。エクセルVBAでWord文書を開いてページ数や文字数などのいろんな情報を取得するエクセルVBAでWord文書を操作する方法についてシリーズでお伝えしております。今回は、起動したWordアプリケーション上にWord文書を開いて、ページ数や文字数などのいろいろな情報を取得します。tonari-it.com2017.09.22エクセルVBAでWord文書を開いてページ数や文字数などの色々な情報を取得する方法をお伝えしました。今回は、このプログラムを応用して、エクセルVBAでフォルダ内のWord文書の各種情報を取得してリスト化するプログラムを作っていきます。前回のおさらい前回作成したプログラムはこちらです。Sub「原稿(1章).docx」というファイルのページ数や段落数など色々な情報を取得するプログラムでした。7行目~16行目までの処理を、フォルダ内のWord文書について繰り返すように改良をしていきたいと思います。今回やりたいこと:フォルダ内のWord文書の情報をリスト化まず、対象となるWord文書を以下フォルダに用意しています。現在マクロを記述しているエクセルファイルが「Book1.xlsm」で、情報を取得したいWord文書ファイルが「原稿」というフォルダ内にゴソっと入っているという前提です。取得した情報について記載するシートは以下の通りです。2行目にSUM関数を仕込んでいて、合計値を算出できるようにしています。このシートのオブジェクト名は「Sheet1」としています。フォルダ内のWord文書の情報をリスト化するプログラムでは、実際のプログラムを紹介しましょう、こちらです。Subこれを実行すると、以下のようにフォルダ内に存在するすべてのWord文書についての情報をリスト化することができます。Each~Next文を使うのが便利です。Each文でobjFolder内のファイル全てについて繰り返しという部分です。それぞれの命令について詳細は以下の記事をご覧ください。Each文でファイル一覧を取得する方法エクセルVBAでFileSystemオブジェクトを使ってファイルやフォルダの操作をする方法についてお伝えしています。Each文を使ってファイル一覧を出力する方法です。tonari-it.com2017.03.26WithステートメントとOpenメソッドの組み合わせ21行目で、現在繰り返しの対象となっているWord文書を開き、それをWithステートメントの対象としてます。WithステートメントとOpenメソッドの組み合わせの記述です。Withこれにより、Withブロック内では開いたWord文書について、オブジェクト名を省略して記述できるようになります。Word文書の情報を取得24行目~28行目は前回紹介した部分で、Word文書の各種情報を取得しています。23行目は、見てわかりますが、Nameプロパティでファイル名を取得している部分です。Fileオブジェクト.Nameまとめ以上、エクセルVBAでフォルダ内のWord文書のページ数、文字数などをリスト化するプログラムを紹介しました。Word文書がたくさんあったとしても、いちいち開いて確認する必要はありませんね。次回はまた別の情報の取得の仕方について、紹介をしていきます。お楽しみに!連載目次:エクセルVBAでWord文書を操作する方法Word文書についての情報を集めてリストを作りたい、そんなときはエクセルVBAでWord文書を開いたり、情報を取得したりしたいものです。シリーズでは初心者でもできる、エクセルVBAからのWord文書の操作の仕方をお伝えします。プランノーツ代表、コミュニティ「ノンプロ研」主宰。ITで日本の『働く』の価値を上げる!」をテーマに、VBA&GASの開発、講師、執筆などをしております。→詳しいプロフィールはコチラ★ご依頼・ご相談はお気軽にどうぞ!→お問い合わせはコチラ★フォロー頂ければ嬉しいです。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。【エクセルVBA&Access連携】SQL文でデータを抽出する最も簡単なプログラムエクセルVBAでAccessデータベースを操作する方法についてシリーズでお伝えしています。今回はデータベース言語SQLとADODB.Recordsetオブジェクトでデータベースからデータを抽出します。初心者向けエクセルVBAでCSVファイルを取り込む方法丁寧に解説をしていきたいと思います。初回は準備編としてそもそもCSVファイルとは何か、エクセルで開く際の注意点についてお伝えします。初心者でも簡単!エクセルVBAでPDFを出力する最もシンプルなプログラムエクセルVBAではPDF形式での出力もできます。今回は、初心者向けエクセルVBAでPDFを出力する最も簡単なプログラムと、PDF出力の際にシート1ページに収めて出力する方法についてお伝えしていきます。【初心者向けエクセルVBA】現在マクロを書いているブックのフォルダパスを取得する初心者向けエクセルVBAのシリーズとして請求書を作成するマクロの作り方をお伝えしています。今回はエクセルVBAで現在マクロを書いているブックのフォルダのパスを取得する方法についてお伝えします。脱エクセルVBA初心者向け、請求書を自動で作る際の様々なテクニックをお伝えしています。今回は、エクセルVBAで特定のシートを削除する方法と、削除時の確認メッセージをオフにする方法についてお伝えします。VBAのApplication_NewMailExイベントとGetItemFromIDメソッドで、特定の件名を持つメールを受信したら、メッセージを表示する方法をご紹介しています。イベントの処理対象にするメールの条件を吟味すれば、欲しいメールだけをメッセージで知らせてくれますよ。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント109セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント109セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。Scriptが「V8ランタイム」をサポート!モダンなECMAScript構文が使えるようになった2020.02.072020.02.08GASでコピーしたGoogleスライドのプレゼンテーションを取得する方法2020.02.052020.02.05Facebookページいつも隣にitのお仕事タイトルとURLをコピーしました。