0

指定フォルダの.csvファイル数をカウントするスクリプトを下記の通りある方に教わり、実行してみましたが、

上記のエラーが出ます。デバッグ方法を教えてください。

ーー<ここから>ーーー

Set objFileSys = CreateObject("Scripting.FileSystemObject")

'フォルダオブジェクトを取得
Set objFolder = objFileSys.GetFolder(!フォルダ名!)

'ファイルの数を数える変数を初期化
count = 0

'拡張子がCSVのファイルを数える
For Each f In objFolder.Files
  If UCase(objFileSys.GetExtensionName(f.Path)) = "CSV" Then
    count = count + 1
  End If
Next

'結果をWinActorの変数に設定
SetUMSVariable $ファイル数$, count

Set objFileSys = Nothing

ーー<ここまで>ーーー

kenji 回答した質問
回答とコメントは、会員登録(無料)で閲覧できるようになります。