f = Dir(p & "*.*") '返回變數P指定路徑下帶任意副檔名的檔名 ... 如果檔名不為空,則…… k = k + 1 '累加檔案個數. Cells(k, 1) = f f = Dir
確定! 回上一頁