每当单击对话框中的cancel/quit按钮时,我都会收到类型不匹配的错误。错误出现在Application.GetOpenFileName行上。有人知道这里出了什么问题吗?As Variant
Dim win As Window
fname = Application.GetOpenFilename(filefilter:="Excel, *xls
以前,我问过一个问题,如何使用XLDialogaveAs将一个Excel文件保存到指定的位置(对于尚未保存的文件是有效的)- 。但是,我试图对已保存在计算机中的Excel文件执行相同的操作,但更改位置。Option Explicit
Dim wks As Worksheet
'Set wks to the current active
我只是不想得到一个调试错误,当我退出GetOpenFilename窗口而没有选择任何工作簿,只是结束子。其次,当选择“所有文件”筛选器时,我无法获得GetOpenFilename对话框来显示所有其他可用文件名(xls、xlm、xlsx、xlsm)。为了使它正常工作,我应该改变什么?)
Dim FileFilter As StringDim Title As String
Dim MultiSelect</e