Excel内置对话框的数量非常多，在我们日常工作中也是经常使用的，为了方便用户的使用，微软已经内嵌在菜单、工具栏、功能区，功能组等地方，如果我们自己对Excel进行个性化的二次定制，那么为了在自己开发的应用程序中指定的地方使用Excel内置对话框来丰富我们的程序功能，同时又减少重复劳动，就可以使用VBA代码来显示这些对话框，然后再对指定的对象进行精准操作。
利用VBA代码打开Excel内置的对话框很简单，只需要简短的几句代码即可，为了能够依次打开，这里笔者使用循环的方式来打开。咱们先来看几张打开的对话框截图，最后再附上完整代码。
下面是程序打开的对话框的截图：
由于Excel内置的对话框有很多，这里就不把所有的截图在这里展示，感兴趣的朋友可以复制下面的代码，自己运行。下面附上完整代码段：
Public Sub 依次打开Excel内置对话框()
On Error Resume Next
Dim i As Long
For i = 0 To Application.Dialogs.Count
Application.Dialogs(i).Show
Next
End Sub
| 留言与评论（共有 0 条评论） |
