|
▼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」なるものはユーザー関数のようですが、
>この中身は何なのでしょう。
⇒これは、選択した中のリストを参照しています。すいません、自分で書いといて良く理解していません。。。
|
|