今日はVBAのネタです。
VBAでファイルやフォルダが存在してるか確認したいことは多々あります。
そういうときに使える存在チェックの方法についてです。
下記のようにすることで実装できます。
'ファイル、フォルダの存在チェック Public Function existDirCheck(path As String) As Boolean '結果 Dim result result = Dir(path, vbDirectory) If result <> "" Then 'フォルダが存在する existDirCheck = True Else 'フォルダが存在しない existDirCheck = False End If End Function