本文へジャンプ

特設サイト一覧

PC Online's Weekly

PR

2010年1月14日 page:1/3次へ

【ファイル】フォルダ内のファイル名一覧を自動作成

田中 亨=Office TANAKA

印刷ページ
出典:日経PC21 2009年6月号(執筆時の情報に基づいており、現在では異なる場合があります)

 Excelのマクロは、単にワークシートの中の操作を自動化できるだけではない。ファイルを開いたり保存したりと、ファイルの操作も可能だ。その機能を応用すると、「指定したフォルダの中にあるファイル名の一覧を作成する」といったことまで、Excelだけで実現できる(図1)。早速、そのマクロを作ってみよう。

図1 フォルダ内のファイル名一覧を作るマクロを作成してみよう。フォルダのパスをB1セルに入力して(1)、マクロを実行すると(2)、A4セルから順にファイル名が表示される(3)
拡大表示

ファイル名はDirで調査、繰り返し構文とともに活用

 実際のコードが図2。一見難しそうだが、1つひとつの処理を順に追っていくと、何をしているかがわかる。このマクロのポイントは、3つある。 

図2 指定したフォルダ内にあるファイル名一覧を作成するマクロのコード。一見複雑そうに見えるが、個々のコードの役割を順に追っていけば、理解しやすい
拡大表示

 まずは、ファイル名を調べるコード「Dir」の使い方だ。これは、カッコの中の引数にファイルのパスを指定すると、ファイルが存在するときはファイル名が、存在しないときは空欄が計算結果になるものだ[注]。

 引数のパスには、すべての文字を表す「*」といった記号(ワイルドカード)が使える。フォルダのパスに「¥*.*」を結合すると、「フォルダ内にあるすべてのファイル」という意味になる。これを引数に指定したとき、Dirは図3のような振る舞いをする。Dirを繰り返し呼び出すことで、すべてのファイル名を調べられる。

 図2のコードではDirを、最初の1回はパスを指定して呼び出し、2回目以降は引数を省略し、「Do While~Loop」という構文を使って、何度も繰り返し呼び出している。

図3 「Dir」は、パスで指定したファイルの名前が結果になるコード。すべての文字を表す「*」を使い、フォルダのパスに「¥*.*」を結合した文字列を引数に指定すると、何度もDirを呼び出すことで、ファイル名を次々と取得できる。全部見つけた後は、Dirの結果は空欄("")になる
拡大表示

[注]Dirの引数は、パスを指定しなければならないが、計算結果はファイル名と拡張子だけになる


「本当に役立つ!Excel 3行マクロ」の記事一覧(新着順)

キーワード

マクロ

【好評発売中!】
日経PC21 2015年10月号

・Windows10 アップグレード完全ガイド
・エクセル&ワード スピード文書術
・外付けHDDの「賢い」選び方 ほか

詳しくはこちら

ショッピング

 
 

最新ランキング

PICK UP

FacebookTwitter

ITpro記事ランキング

ITpro Active記事ランキング

PC Online会員登録

最新刊のご案内

  • 日経パソコン特別編集 Windows 10 入門

    日経パソコン特別編集
    Windows 10 入門

    【アップグレード前に必読!】
    いよいよ登場した「Windows 10」。
    新機能の詳細からアップグレード前の注意点、
    使いこなし術までを網羅した解説書の決定版!
    ★190頁・370語の「ポケット用語事典」付き★

  • PC自作専門誌 日経WinPC 2015年夏号

    PC自作専門誌
    日経WinPC 2015年夏号

    【帰ってきた史上最強の自作プラン!】
    Windows10や新CPUはどのような構成なら性能を
    引き出せるのか?最新マシンから実用本位の
    低価格マシンまで、注目の作例5台を紹介!
    ★130頁・280語のポケット用語事典付き★

  • 日経PC21【保存版】バックナンバーDVD2012-2014

    日経PC21
    【保存版】バックナンバーDVD
    2012-2014

    ★好評発売中!★
    2012年1月号~2015年4月号の
    過去3年+4カ月分の本誌40冊分の記事と、
    この期間の冊子付録およびディスク付録、
    17点分のコンテンツを1枚のDVDに収録!

  • 2015年最新版アンドロイドは初期設定で使うな

    2015年最新版
    アンドロイドは初期設定で使うな

    初めての人も買い替えの人も、なるほど納得!
    “使いにくさ”をとことん解消する方法から、
    最新ワザまで丸わかり。アンドロイド活用の
    決定版です。

最新の誌面から

  • 日経パソコン 2015年8月24日号

    日経パソコン 2015年8月24日号

    パソコンを仕事と生活に活かす総合情報誌
    ・アナログ→デジタル最新手法
    ・ここまで使える!Office for Windows 10 ほか

  • 日経PC21 2015年10月号

    日経PC21 2015年10月号

    ビジネスマンのパソコン誌
    ・Windows10 アップグレード完全ガイド
    ・エクセル&ワード スピード文書術
    ・外付けHDDの「賢い」選び方 ほか

日経パソコンスキルアップ倶楽部