Excel VBA質問箱 IV

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

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


26413 / 76732 ←次へ | 前へ→

【55650】Re:リストボックスに複数のファイル形式を抽出
質問  aki-33  - 08/5/14(水) 16:17 -

引用なし
パスワード
   ▼kanabun さん:
>Excelのバージョンが 2003 までなら、
>Application.FileSearch オブジェクトの
>  .FileName プロパティに "*.jpg;*.bmp;*.tif;*.gif"
>などと、複数拡張子を並べて検索することができます。

下記のコードを記述し試行しましたが何も表示されませんでした。
どこが間違っているのでしょうか?
  myDir = TextBox1.Text & "\"
  myFName = Dir(myDir & "*.jpg;*.bmp;*.tif;*.gif")
  Do While myFName <> ""
    ListBox1.AddItem myFName
    myFName = Dir()
  Loop
If ListBox1.ListCount = 0 Then
Else
  ListBox1.ListIndex = 0
End If

0 hits

【55646】リストボックスに複数のファイル形式を抽出 aki-33 08/5/14(水) 15:45 質問
【55649】Re:リストボックスに複数のファイル形式を... kanabun 08/5/14(水) 15:59 発言
【55650】Re:リストボックスに複数のファイル形式を... aki-33 08/5/14(水) 16:17 質問
【55655】Re:リストボックスに複数のファイル形式を... kanabun 08/5/14(水) 16:54 回答
【55657】Re:リストボックスに複数のファイル形式を... kanabun 08/5/14(水) 17:07 発言
【55660】Re:リストボックスに複数のファイル形式を... aki-33 08/5/14(水) 17:45 質問
【55661】Re:リストボックスに複数のファイル形式を... kanabun 08/5/14(水) 17:50 発言
【55662】Re:リストボックスに複数のファイル形式を... aki-33 08/5/14(水) 17:57 発言
【55663】Re:リストボックスに複数のファイル形式を... kanabun 08/5/14(水) 18:03 回答
【55665】Re:リストボックスに複数のファイル形式を... aki-33 08/5/14(水) 19:36 お礼

26413 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free