| 
    
     |  | ▼inoue さん: >こんばんは。
 >
 >▼yuuka さん:
 >>ひとつご質問があるのですが、
 >>上記の作成したのですが、うまく動作しません。
 >どこがどのように「うまく動作しません」なのですか?
 >ご自分でデバッグできているのでしょうか?
 >
 ⇒うまく動作しないというのは、ファイルがあるのに「ファイルがありません。」と表示されてしまいます。
 >とりあえず、
 >>  'FSOのオブジェクトを取得
 >>  Set objFso = CreateObject("Scripting.FileSystemObject")
 >デバッグ中は参照設定された方が良いと思います。
 >
 >>  strPath = oFolder
 >これだとそのフォルダ名だけしか取れないのでは?
 >フルパスが取得できないと以降の処理はできないでしょう。
 >strPath = oFolder.self.Path
 >とかでないと。(Windowsのバージョンによりますが)
 >⇒ここの変更方法がいまいちわかりません。。。バージョンはxpです
 
 >>  '指定フォルダからファイル名を取得
 >>  If Not GetFilesList(vntFileNames, strPath, objFso, "csv", ".*") Then
 >「GetFilesList」なるものはユーザー関数のようですが、
 >この中身は何なのでしょう。
 ⇒これは、選択した中のリストを参照しています。すいません、自分で書いといて良く理解していません。。。
 
 |  |