vba獲取打開的excel文件名

❶ excel vba打開文件 並且獲得文件名 保存

f = Dir(folder & "*.txt")
myfile = Dir
f 和 myfile 兩個變數混淆了

❷ 利用VBA獲取Excel最近使用的工作簿列表

下面的VBA代碼可以獲取Excel中最近使用的工作簿的完整路徑和名稱，並將其放到代碼所在工作表的A列中。在Excel 2007和Excel 2010中，如果通過「Office按鈕（或「文件」選項卡）→Excel選項→高級」設置顯示「最近使用的文檔」數量大於「0」，該代碼可以顯示最近使用的最多50個工作簿名稱。而對於Excel 2003，A列中顯示的工作簿名稱數量與「文件」菜單底部所顯示的最近使用文件數量相同。
按Alt+F11，打開VBA編輯器，在右側代碼窗口中輸入下列代碼：
Sub GetMRUList()
On Error Resume Next
Dim i, MRUNum As Integer
MRUNum = Application.RecentFiles.Maximum
Application.RecentFiles.Maximum = 50
Range("A1:A50").Clear
For i = 1 To 50
Cells(i, 1) = Application.RecentFiles(i).Path
Next i
Application.RecentFiles.Maximum = MRUNum
End Sub
運行代碼，即可在A列中顯示最近使用的工作簿列表。