- Excel VBA活用范例实用手册(畅销升级版)
- 韩小良
- 312字
- 2021-03-23 12:13:02
046 显示常用的Excel内置对话框
Dialogs属性
为了方便用户快速地显示Excel的内置对话框,图1-7中列举了一些常用的内置对话框的VB常量及值。
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00064001.jpg?sign=1739216902-YH0x9Db8pUPUWT2VucWgeIjQngjDCuQl-0-904799be72b5f62e5ae332c705ec1162)
图1-7 一些常用的内置对话框的VB常量及值
在Excel工作表中插入一个按钮,为其指定一个名为“范例1_046”的宏,宏代码如下:
第1章\范例1-046.xlsm
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00064002.jpg?sign=1739216902-LfAkkA7baqIAUcp6culRX2JStem2Xj0M-0-97ece6fd060cf91e034d4e0a19a5468f)
插入一个窗体,在此窗体中插入一个列表框ListBox1和一个命令按钮CommandButton1,如图1-8所示。为用户窗体设置Initialize事件,为列表框和命令按钮设置Click事件,程序代码分别如下所示。关于如何设计用户窗体及其事件程序,可参阅后面的有关章节。
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00064003.jpg?sign=1739216902-zaR11oXw2sAaPBxgG2jyWxsuklPx9FbX-0-6ecfa18163083e4fc8e3ea5d0e21d414)
图1-8 插入列表框和命令按钮
第1章\范例1-046.xlsm
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00065001.jpg?sign=1739216902-PRsQY509cwh50JuiNIpIPwkeYs1w0sst-0-a65ec909ed5a538b8fd1f1e12ceaa4d9)
单击工作表上的按钮,打开用户窗体,如图1-9所示,单击列表框中的某个内置对话框,就可以显示该对话框,如图1-10所示。
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00065002.jpg?sign=1739216902-cGyO6CcbkcwtMihfvqb4sXTUbbtuk5Ty-0-b0b069b4b6ee1938e09e9b08726cd135)
图1-9 打开用户窗体
![](https://epubservercos.yuewen.com/BB8EB9/14615854705701106/epubprivate/OEBPS/Images/img00065003.jpg?sign=1739216902-GXmXyjr3jO6xKbgv2shgUgwlvIvhsFhW-0-b74b622870012b75c310707f90452f72)
图1-10 显示【单元格格式】对话框