コピー2017.10.02こんにちは!あつもり(@atumori17)です。前回は「ドラッグアンドドロップしてファイル名とフルパスを取得する方法」を紹介しましたが、今回はその内容をさらに便利にしてお伝えしていこうと思います。日常業務の中でファイル名のフルパスが知りたいっていうケースがあると思います。そんな時にすぐにファイルのパスがわかると便利ですよね。WScriptオブジェクトのArgumentsプロパティを使うことで、ドラッグアンドドロップしたファイルのフルパスをコレクションとして取得することができます。tonari-it.com2017.09.19前回はドラッグアンドドロップしたファイルのフルパスとファイル名をInputBoxを使って表示させました。この方法だとファイルが1つの場合は良いのですが、複数ファイルの場合ちょっと不便に感じることがあるかもしれません。エクセルを使ってファイル名とフルパスの一覧表を作成する場合などです。ファイルの数ぶんコピー&ペーストを繰り返さなければいけませんよね。何とかならないかな?ってことで今回は「ドラッグアンドドロップで複数ファイルのフルパスをCSVに書き出す方法」を紹介していきます。目次CSVファイルとはデータをカンマで区切ったテキストファイルファイルパスをCSVファイルに書き出すスクリプトプログラムコードの解説GetParentFolderNameメソッドで親フォルダのパスを取得する自作関数に引数を渡してCSVファイルとして書き出すドラッグアンドドロップでのCSV書き出しを実行してみるテスト用のファイルを作成してドラッグアンドドロップする書き出されたCSVファイル開いてみるまとめ連載目次:初心者でも簡単!VBScriptでWindows効率化CSVファイルとはデータをカンマで区切ったテキストファイルスクリプトの解説に入る前にCSVファイルとは何か?という説明をさせてください。ひとことで言うと「カンマで区切られた値が入ったテキストファイル」です。Valueの略になります。CSVファイルはデータベースからデータをエクスポートしてエクセルで加工したり、逆にエクセルで作ったデータをデータベースにインポートしたりなんて時に使います。このようにCSVファイルはさまざまなソフトと互換性があるので、データのやりとりをするのに使われることが多いファイル形式なんです。下の画像はデータベースからエクスポートした「商品マスタ.csv」をエクセルで開いた例です。カンマで区切られたデータをセルごと分けて開いてくれます。CSVファイルはエクセルと相性がいいんですね。ファイルパスをCSVファイルに書き出すスクリプトCSVとは何かの説明が終わったところで、スクリプトの全文を紹介します。テキストエディタを開き、下記のコードを入力します。全て入力し終わったら「ファイルのフルパスをCSVに書き出す.vbs」などのファイル名でデスクトップに保存します。Functionプログラムコードの解説GetParentFolderNameメソッドで親フォルダのパスを取得する今回はCSVファイルに書き出すということで、せっかくですので親フォルダのパスも取得しようと思います。親フォルダとは指定したファイルが入っているフォルダを指します。以下の画像を見てください。フォルダのパスは「C:\work\勉強会資料」となります。親フォルダのパスを取得するにはファイルシステムオブジェクトのGetParentFolderNameメソッドを使います。ファイルシステムオブジェクト.GetParentFolderName(ファイルパス)ファイルパスには対象ファイルのフルパスを指定します。自作関数に引数を渡してCSVファイルとして書き出すOutputText関数は自作した関数です。この関数は引数で渡した値をテキストファイルに書き出すというものです。上記のプログラムコードの31行目から48行目になります。自作関数のOutputText関数については過去の記事で詳しく紹介していますので参考にしてみてください。VBScriptでWEBスクレイピング!ファイルシステムオブジェクトでテキストに書き出すVBScriptでファイルシステムオブジェクトを使ってシンプルにテキストファイルに保存するテクニックの紹介です。WEBスクレイピングでWEBサイトから必要な情報を取得しても、保存する場所がなければ取得したデータを使うことはできないからです。tonari-it.com2017.07.20今回のアプリケーションではCSVファイルに書き出すので、OutputText関数に渡すデータはカンマで連結させたデータになります。ここではファイルのフルパス、親フォルダのパス、ファイル名をカンマで連結させています。上記のプログラムコードの23、24行目になります。FileName気をつけなければいけないのが、過去の記事で紹介しているOutputText関数は拡張子を.txtとて書き出していましたが、今回はCSVファイルですので拡張子を.csvにします。上記のプログラムコードの38行目になります。True)プログラムの説明は以上になります。ドラッグアンドドロップでのCSV書き出しを実行してみるテスト用のファイルを作成してドラッグアンドドロップするまずはテスト用のファイルを作ります。今回は「C:\work」フォルダの下に「勉強会資料」フォルダを作り、マニュアル1~5.xlsを作りました。実際に起動してみます。デスクトップにある「ファイルのフルパスをCSVに書き出す.vbs」にテスト用に作成したエクセルファイルをドラッグアンドドロップします。メッセージボックスが表示されたらOKボタンを押します。「C:\work」フォルダの下にファイルパス.csvファイルができました。書き出されたCSVファイル開いてみるそれでは書き出されたCSVファイルをテキストエディタで開いてみましょう。開いたファイルを見てみると、ドラッグアンドドロップしたファイルのフルパス親フォルダのパスファイル名がカンマで区切られて書き出されていますね。エクセルでも開いてみましょう。おお~!いい感じにセルごとにデータが分かれましたっ。まとめいかかでしたか?今回の内容をまとめると以下のようになります。CSVファイルはカンマで区切られた値が入ったテキストファイルでエクセルと相性がいいGetParentFolderNameメソッドで親フォルダのパスを取得できる以上になりますっ。テキストエディタで簡単にできますので初心者にもおすすめです。プランノーツ代表、コミュニティ「ノンプロ研」主宰。ITで日本の『働く』の価値を上げる!」をテーマに、VBA&GASの開発、講師、執筆などをしております。→詳しいプロフィールはコチラ★ご依頼・ご相談はお気軽にどうぞ!→お問い合わせはコチラ★フォロー頂ければ嬉しいです。「コミュニティ+講座」形式で継続性&教え合える環境も提供。!ノンプログラマーがプログラミングスキルを身に着ける支援ををするコミュニティ。セミナー・もくもく会・Facebookグループのサポートで「自らで学び続ける力をつける」支援、「教え合うことで学びの価値を上げる」場の提供をしています。関連記事VBScriptVBScriptでWEBスクレイピング!HTMLドキュメントとタイトルを取得する方法IEを操作してHTMLドキュメントからWEBサイトのタイトル名を取得するテクニックを紹介します。IEでページ全体を読み込みんでからtitleタグをキーにしてタイトル名を取得します。HTMLの知識がちょっとだけ必要になってきますので合わせて解説していきます。2017.08.02VBScriptVBScriptでWEBスクレイピング!アメブロの投稿記事一覧をテキストファイルに書き出す方法VBScriptを使ったWEBスクレイピングのテクニックの紹介です。アメブロのブログ管理画面に自動ログインして、1月から12月までの投稿記事のタイトル名をテキストファイルに書き出していきます。今まで解説してきたWEBスクレイピングのテクニックの集大成になります。2017.11.30VBScriptVBScriptでWEBスクレイピング!aタグのリンクURLを全部取得する方法ページ内にあるリンクURLを全て取得してテキストファイルに書き出す方法を紹介します。eachステートメントでコレクションの中の要素の数だけループさせ、リンク参照先のURLを取得します。2017.08.16VBScript初心者でも簡単プログラムでWindowsの効率化!VBScriptをやってみよう特別なアプリケーションのインストール不要。初心者向けのプログラミング言語VBScriptの紹介です。VBScriptの概要から、実際にプログラムをしてメッセージボックスを表示させるところまでの説明です。VBScriptを使うWindowsの業務効率化に役立ちます。日常業務の中でファイル名のフルパスが知りたいっていうケースがあると思います。そんな時にすぐにファイルのパスがわかると便利ですよね。WScriptオブジェクトのArgumentsプロパティを使うことで、ドラッグアンドドロップしたファイルのフルパスをコレクションとして取得することができます。2017.09.19VBScriptVBScriptでWEBスクレイピング!テーブル要素を取得してCSVファイルで書き出すページ内にあるテーブル要素を抜き出してCSVファイルとして書き出す方法を紹介します。CSVファイルで書き出しておけば、エクセルなどで簡単に開けるので便利ですよ。Each文を使いtr要素、td要素を取り出していきます。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント108セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。「コミュニティ+講座」形式で継続性&教え合える環境も提供。詳細・お申込はこちら隣ITを応援する当ブログを「応援したい!」「役に立ったよ!」というお気持ちを、コチラからお支払いただくことができます。日々更新の活力倍増いたします。※PayPalアカウントが必要です。※金額は変更可能です。Platform23HTML・CSS32iPhone・アプリ29Monaca・スマホアプリ開発7PC全般・Windows86PowerPoint・VBA28Python87RPA1VBScript15Vue.js・JavaScript13WEBサービス・クラウド68WordPress・ブログ88Word・VBA42コミュニティ・イベント108セミナーのお知らせ11チャットワーク72データ分析・アクセス解析40仕事・生産性・働き方73動画配信8商業出版21起業・フリーランス72電子書籍・Kindle3運営会社プランノーツは"IT×働き方改革"をお手伝いする会社です。RowSourceプロパティとAddItemメソッド2020.01.21GASでGoogleスライドのSlideオブジェクトの概要とその取得方法2020.01.162020.01.24Facebookページいつも隣にitのお仕事タイトルとURLをコピーしました。