請教With Application.FileSearch無法使用
- 帖子
- 51
- 主題
- 19
- 精華
- 0
- 積分
- 84
- 點名
- 0
- 作業系統
- vista
- 軟體版本
- office2010
- 閱讀權限
- 20
- 註冊時間
- 2014-11-26
- 最後登錄
- 2024-1-15
|
請教With Application.FileSearch無法使用
Dear 大大,
之前用office 97時我都使用With Application.FileSearch找檔案
今天公司用不同的office版本才發現With Application.FileSearch己經不能再用了,
請問各位前大大,以下程式碼應該怎麼修改才好?
Sub save()
Application.DisplayAlerts = False
With Application.FileSearch
D = ThisWorkbook.Sheets("Yield-ByDate").Range("D1").Value
MyData1 = "http://rptap/report/Daily/DailyWaferYield/DailyWaferYield-" & Format(D - 1, "yyyy-mm-dd") & ".xls"
Set f1 = Workbooks.Open(MyData1, UpdateLinks:=0) |
|
|
|
|
|
|
|
發表於 2014-11-26 09:30
| 
