Excel獲取指定路徑的文件名 vba代碼

在Excel VBA中，如果需要Excel獲取指定路徑的文件名以方便用戶的操作體驗(yàn)，可通過(guò)VBAExcel獲取指定路徑的文件名。Excel2003可通過(guò)VBA宏Excel獲取指定路徑的文件名。

Excel獲取指定路徑的文件名的方法：

首先按“Alt+F11”組合鍵，Excel2003打開(kāi)代碼器，單擊“插入”菜單-“模塊”，雙擊插入的模塊，在右側(cè)的代碼窗口中輸入：Sub Excel_Partner()Dim myFilename As String, myPath As StringChDir Application.DefaultFilePath ‘改變默認(rèn)路徑myPath = "C:" ‘指定的任意路徑SendKeys myPath & "{TAB}" ‘將指定的任意路徑發(fā)送到“打開(kāi)”對(duì)話框myFilename = Application.GetOpenFilenameRange("A1") = myFilenameEnd Sub

按F5運(yùn)行鍵運(yùn)行程序，Excel調(diào)用“打開(kāi)”對(duì)話框，自動(dòng)打開(kāi)指定的路徑。雙擊指定的文件，Excel獲取指定路徑的文件名。

相關(guān)說(shuō)明： 當(dāng)輸入法處于中文輸入法狀態(tài)時(shí)，將不能打開(kāi)指定的路徑。