Home » パワーポイントマクロ・PowerPoint VBAの使い方 » フォルダーの有無を確認する－ Dir(PathName, vbDirectory)

フォルダーの有無を確認する－ Dir(PathName, vbDirectory)

「powerpoint vba フォルダの有無」
という検索キーワードで、このサイト『インストラクターのネタ帳』へのアクセスがありました。

PowerPoint VBAで、フォルダーがあるかどうかを調べるには、どのようなコードを書けばいいのかを探していた方による検索です。

［スポンサードリンク］

フォルダーの有無を確認するサンプルマクロ

以下のSubプロシージャを実行したときに、Cドライブにtmpフォルダーが存在すれば、
「C:\tmp は存在します！」
存在しなければ、
「C:\tmp はありません。」
とメッセージが表示されます。

Sub フォルダーの有無確認()
　Const FOL_PATH = "C:\tmp"

　If Dir(FOL_PATH, vbDirectory) = "" Then
　　MsgBox FOL_PATH & " はありません。"
　Else
　　MsgBox FOL_PATH & " は存在します！"
　End If
End Sub

サンプルマクロの解説

VBAの、Dir関数の第2引数に、

オブジェクトブラウザー：Dir関数

VbFileAttribute列挙に定義されている定数vbDirectoryを指定すれば、

オブジェクトブラウザー：VbFileAttribute

フォルダーの有無を調べられます。

Dir関数は、指定したファイルが存在しないときに空白文字列を返すので、
　　If Dir(FOL_PATH, vbDirectory) = "" Then
と判定しています。

ちなみにこのSubプロシージャは、PowerPointに関する処理が一切入っていませんから、Excel VBAでもWord VBAでも変更なしで実行できます。

［スポンサードリンク］

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » フォルダーの有無を確認する－ Dir(PathName, vbDirectory)

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓ Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓ 『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓ PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓ 日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓ 上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓ Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓ 小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓ 数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓ 図形を操作するExcel VBAの基本を解説したキンドル本を書きました↓↓ グラフを操作するExcel VBAの基本を解説したキンドル本も出しました↓↓ Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓


「パワーポイントマクロ・PowerPoint VBAの使い方」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.