Board logo

標題: [發問] 有大大能幫忙嗎Application.FileSearch [打印本頁]

作者: ettoday22    時間: 2014-9-10 17:34     標題: 有大大能幫忙嗎Application.FileSearch

各位大大們好,因為excel更新後程式無法用了,
下列程式有問題,但小弟又不會改,希望有高手
能幫忙!

    Set FS = Application.FileSearch
   
    With FS
   
         .LookIn = FilePath
         .FileName = FileSpec
         .FileType = msoFileTypeExcelWorkbooks
         .Execute
         
         If .FoundFiles.Count = 0 Then
             MsgBox "No files were found !"
             Exit Sub
         End If
   
     End With
作者: bobomi    時間: 2014-9-11 20:09

http://forum.twbts.com/thread-671-1-1.html




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)