Excel VBA質問箱 IV

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

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


26730 / 76732 ←次へ | 前へ→

【55332】Re:特定のフォルダの中に入っているファイル名を取得
発言  Yuki  - 08/4/28(月) 15:51 -

引用なし
パスワード
   ▼あり さん:
こんにちは。

>指定したフォルダの中に入っている、ファイル名を取得するマクロを教えてください。
>ちなみに、中はEXCELのみです。

Sub TEST1()
  Dim strDir As String
  Dim strFNM As String
  Dim i    As Long
  
  strDir = "D:\指定フォルダー\"
  strFNM = "*.xls"
  
  strFNM = Dir(strDir & strFNM)
  
  Do While strFNM <> ""
    i = i + 1
    Cells(i, 1).Value = strFNM ' 一列目に書出し
    strFNM = Dir
  Loop
End Sub
0 hits

【55331】特定のフォルダの中に入っているファイル名を取得 あり 08/4/28(月) 15:40 質問
【55332】Re:特定のフォルダの中に入っているファイ... Yuki 08/4/28(月) 15:51 発言
【55333】Re:特定のフォルダの中に入っているファイ... あり 08/4/28(月) 16:02 お礼

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