vba查找使用增量的文件路徑？

Question

我嘗試使用下面的VBA代碼找到我的文件的文件路徑：

可以說我有一個名爲text.xlsx

這可以存儲文件中

G:\Folder\1. 2017 

    Or 

    G:\Folder\2. 2017 

    Or 

    G:\Folder\3. 2017 

    etc 

所以我試圖用for循環來檢查數字1到10

確保找到路徑。

Sub PlannerOpen() 
Dim i As Integer 
For i = 1 To 10 
Path = "G:\Folder\" & i & ". " & Year(Date) & "\" 
MsgBox Path & "*.xlsx" 
i = i + 1 
Next i 

End Sub 

這似乎只生產數字1，3，5和9

我做錯什麼了嗎？ 請有人告訴我我要去哪裏？

Answer 1

的For i = 1 to 10線是環的開始，設置i到1並且將在每次迭代通過1增加它（除非Step另有規定），直到達到10。

你的循環開始於1，創建Msgbox與1但你手動增加i到2與線i = i + 1。然後它返回到循環的開始，默認按照設計將i增加1，將其設置爲3。

刪除您的手冊i = i + 1增量並允許循環爲您完成。

Answer 2

刪除下面線，因爲它是沒有必要的

i = i + 1