Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

58513 / 76738

←次へ　｜　前へ→


	【22951】Re:違うフォルダのファイル名の一部が同じファイルを選ぶ

MIKA - 05/3/8(火) 15:29 -


	引用なし

	パスワード

▼IROC さん：
>ファイル名の判定なら文字列の判定ですよね？
>
>先頭２文字がキーなら
>

一番目の質問に書き忘れたのですが、
★の部分が２文字と、３文字のファイル名があるのですが、
その場合はどのように処理をしたらいいのでしょうか？

>Dim myKey As String
>Dim myFile As String
>
>　myKey = Left("★★200501.xls" , 2)
>　myFile = "ABC★★.xls"
>
>　If Instr(myFile, myKey) <> "" Then
>　　　MsgBox "該当するファイルです"
>　Else
>　　　MsgBox "該当しません"
>　End If
>

上だと、一つのファイルに対して、上のコードを書かないといけないのですよね？
でも、各々３０個以上のファイル数があり、３０個以上

　myKey = Left("◇◇200501.xls" , 2)
　myFile = "ABC◇◇.xls"
　　　　　・
　　　　　・
　　　　　・

というように書いていくのでしょうか？

>フォルダ内のファイル名の取得は、ヘルプのDir関数の使用例を参考にして下さい。

ヘルプはインストールされていませんが
調べて頑張ってみます。

0 hits

▼

【22947】違うフォルダのファイル名の一部が同じファイルを選ぶ MIKA 05/3/8(火) 14:43