我在VBA编程中运行程序,弹出无效外部过程,求大神指点,怎么解决?

发布网友发布时间：2023-09-13 14:54

共2个回答

热心网友时间：2024-12-03 15:46

CommonDialog1 是在VB中用的，VBA 请参考如下代码，然后自己修改

Sub 对话框()
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = False
'单选择
.Filters.Clear
'清除文件过滤器
.Filters.Add "Excel Files", "*.xls;*.xlw"
.Filters.Add "All Files", "*.*"
'设置两个文件过滤器
If .Show = -1 Then
'FileDialog 对象的 Show 方法显示对话框，并且返回 -1（如果您按 OK）和 0（如果您按 Cancel）。
MsgBox "您选择的文件是：" & .SelectedItems(1), vbOKOnly + vbInformation, "智能Excel"
End If
End With
End Sub

热心网友时间：2024-12-03 15:47

无效外部过程说明有语句不属性任何过程或函数。
也就是把某些语句写到了过程或函数之外，过程或函数外只能定义变量。