![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
VBSで以下のコードを作成しましたが動作しません。
********動作しない**************************
if (objFileSys.FolderExists("200810*")= True) then
msgbox "yes"
else
msgbox "no"
end if
********動作する**************************
if (objFileSys.FolderExists("200810")= True) then
msgbox "yes"
else
msgbox "no"
end if
部分一致でフォルダが存在するかをしたいのですが、
どうしたらいいのでしょうか。
よろしくお願いします。
No.2ベストアンサー
- 回答日時:
FolderExistsはワイルドカードをサポートしていないので
調べたいフォルダーの親のSubFoldersコレクションを自前で調べる
といったことが必要でしょう
' sParentはFolderオブジェクト、sTargetは調べたい名前
Function myExists( sParent, sTarget )
dim sf, ss
set sf = sParent.SubFolders
for each ss in sf.Name
if Left( ss, len(sTarget)) = sTarget then
myExists = True
Exit Function
end if
next
myEXists = False
End Function
といった具合の関数を使ってはいかがでしょう
No.1
- 回答日時:
一発では出来ないだろうから
カレントフォルダに含まれるフォルダ全てを取得して
http://msdn.microsoft.com/en-us/library/e1dthkks …
FolderオブジェクトのNameプロパティを
Like演算子なりRegExpオブジェクトなり使って検証していくしかない
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) Excel VBA ユーザーフォーム 複数のユーザーフォームの閉じ方。 2 2022/04/27 11:29
- Visual Basic(VBA) [Excel VBA] このコードでは行の挿入や行の消去をすると13のエラーが出てしまう。 3 2022/12/09 00:29
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Excel(エクセル) VBAで “:” を含むセルの特定 2 2023/05/11 16:30
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) VBAユーザーフォームでテキストボックスについて。 1 2022/05/31 12:23
- Visual Basic(VBA) VBAで最新のデータを別シートに転記する方法をお教えください。 3 2022/04/07 19:20
- Excel(エクセル) マクロのコードを、少しでも削って短くしたい 3 2022/08/30 07:46
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
vbsでのアスタリスクとファイル取り込み
Visual Basic(VBA)
-
VBSで特定の文字列が含まれる場合の処理方法
その他(プログラミング・Web制作)
-
VBS パスに変数を入れたい
その他(プログラミング・Web制作)
-
-
4
VBScriptで、ファイルから任意の行のみ取り出す方法について
その他(プログラミング・Web制作)
-
5
【vbs】ファイル名の検索と該当ファイルの削除について
その他(プログラミング・Web制作)
-
6
VBS フォルダ内にあるすべてのファイルを検索→ファイルが特定のファイルなら開く
その他(プログラミング・Web制作)
-
7
VBScript フォルダ以下からファイルの検索、コピー
その他(プログラミング・Web制作)
-
8
VBScriptでフォルダ内の全ファイル名取得
Visual Basic(VBA)
-
9
vbsファイルでのワイルドカード
その他(コンピューター・テクノロジー)
-
10
VBSの処理中一旦処理を止めて再開させたい。
Visual Basic(VBA)
-
11
VBSでフォルダ内の最新のファイルを開く方法
Visual Basic(VBA)
-
12
[VBS] テキストファイルから任意の値を抽出する
Visual Basic(VBA)
-
13
excel VBA 部分一致の名前をパスに指定する方法
Excel(エクセル)
-
14
VBAにて読み込みが出来ない環境依存文字 ㉖ の文字コードを教えて下さい。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
エクセルマクロエラー「'Cells'...
-
VBAで既に開いている別アプリケ...
-
エクセルのVBAの標準モジュール...
-
PowerPointVBAでスライドマスタ...
-
Excelでフィルタをかけると警告...
-
エクセルVBAでcode128のバー...
-
sheetsメソッドの失敗
-
テキストボックス中の文字列の...
-
ある文字列が全て数字であるか...
-
VBAで Set wb = Sheets(1).Cop...
-
コンパイルすると「メソッドま...
-
VBAからPDFファイルにパスワー...
-
[VBA]CDOメッセージ送信エラー
-
オブジェクトが見つかりません
-
実行時エラー 3265「要求された...
-
AccessVBA NULLについて
-
Shell.ApplicationのNameSpace...
-
ExcelVBAでのNZ関数について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
エクセルのVBAの標準モジュール...
-
実行時エラー 3265「要求された...
-
Excelでフィルタをかけると警告...
-
VBAで既に開いている別アプリケ...
-
エクセルマクロエラー「'Cells'...
-
テキストボックス中の文字列の...
-
VBAで Set wb = Sheets(1).Cop...
-
ある文字列が全て数字であるか...
-
VBAからPDFファイルにパスワー...
-
VBScriptでファイルの日時順(降...
-
EXCEL VBA オートシェイプナン...
-
[VBA]CDOメッセージ送信エラー
-
エクセルVBAで2つの画像を比較...
-
PowerPointVBAでスライドマスタ...
-
UserForm1.Showでエラーになり...
-
上下の位置揃えについて
-
VBAについてです。 初心者です...
-
VBAで作成するメール(開封確認...
おすすめ情報