VBA案例精选 显示Excel内置对话框

代码运行结果：

代码截图：

代码文本：

Public Sub 显示Excel内置对话框()

UserForm1.Show

End Sub

VB常量	对话框	值
xlDialogActiveCellFont	单元格格式(字体）	476
xlDialogBorder	单元格格式(边框）	45
xlDialogCellProtection	单元格格式(保护）	46
xlDialogDeleteFormat	单元格格式(数字）	111
xlDialogFormatNumber	单元格格式(数字）	42
xlDialogPatterns	单元格格式(图案）	84
xlDialogClear	清除	52
xlDialogColumnWidth	列宽	47
xlDialogRowHeight	行高	127
xlDialogConditionalFormatting	条件格式	583
xlDialogDefineName	定义名称	61
xlDialogDefineStyle	样式	229
xlDialogDisplay	显示选项	27
xlDialogFont	字体	26
xlDialogSetBackgroundPicture	工作表背景	509
xlDialogInsert	插入	55
xlDialogInsertHyperlink	插入超链接	596
xlDialogInsertPicture	插入图片	342
xlDialogNew	新建工作簿	119
xlDialogOpen	打开	1
xlDialogSaveAs	另存为	5
xlDialogWorkbookCopy	移动或复制工作表（建立副本）	283
xlDialogWorkbookInsert	插入工作表	354
xlDialogWorkbookMove	移动或复制工作表	282
xlDialogWorkbookName	重命名工作表	386
xlDialogWorkbookNew	新建工作表	302
xlDialogWorkbookProtect	保护工作簿	417
xlDialogPageSetup	页面设置	7
xlDialogPrint	打印内容	8
xlDialogPrinterSetup	打印机设置	9
xlDialogPrintPreview	打印预览	222
xlDialogSetPrintTitles	设置打印标题	23
xlDialogRun	宏	17
xlDialogTable	模拟运算表	41
xlDialogSendMail	发送邮件	189

【你们百度三天  不过我随口一句】
郑广学老师独家逐行手写沉浸式案例教学法 知其然更知其所以然
全套教程包含 VBA175例+函数操作408例+代码助手VIP
+100期直播回放
【268元进1000人高手VBA永久答疑群+880网站VIP】
买课咨询请加微信EXCEL880B

点击进入 郑广学老师Excel教程免费学7天 !

---

扫描二维码