在Excel VBA中,如果需要Excel獲取指定類型的文件名以方便用戶的操作體驗,可通過VBAExcel獲取指定類型的文件名。Excel2003可通過VBA宏Excel獲取指定類型的文件名。
Excel獲取指定類型的文件名的方法:
首先按“Alt+F11”組合鍵,Excel2003打開代碼編輯器,單擊“插入”菜單-“模塊”,雙擊插入的模塊,在右側的代碼窗口中輸入:
Sub Excel_Partner_t()
Dim myFileName As String
myFileName = Application.GetOpenFilename("文本文件(*.txt), *.txt")
Range("A1") = myFileName
End Sub
按F5運行鍵運行程序,Excel調用“打開”對話框,在“文件類型”列表框中已經限定為只能打開擴展名為txt的文件。雙擊指定的文件,Excel獲取指定類型的文件名。
輸入如下代碼:
Sub Excel_Partner_p()
Dim myFileName As String
myFileName = Application.GetOpenFilename("圖片文件(*.bmp;*.jpg),* bmp;*.jpg")
Range("A1") = myFileName
End Sub
按F5運行鍵運行程序,Excel調用“打開”對話框,在“文件類型”列表框中已經限定為只能打開擴展名為bmp或jpg的文件。雙擊指定的文件,Excel獲取指定類型的文件名。