回来主页
当时方位: manbetx万博官网 > > Excel VBA教程 >

怎样显现Excel内置对话框

时刻:2015-06-23 22:43来历:manbetx万博官网网 www.fwnyp.com修正:麦田守望者

在Excel VBA中,假如需求显现Excel内置对话框以便运用户的操作体会,可经过VBA显现Excel内置对话框。Excel2007可经过VBA宏显现Excel内置对话框。

显现Excel内置对话框的办法:

首先按“Alt+F11”组合键,Excel2007翻开代码修正器,单击“刺进”菜单-“模块”,双击刺进的模块,在右侧的代码窗口中输入:

Sub Excel_Partner()
    Application.Dialogs(xlDialogBorder).Show
    MsgBox "现已显现“单元格格局(边框)”对话框,接下来将显现“单元格格局(字体)”对话框"
    Application.Dialogs(476).Show
End Sub

按F5运转键运转程序,Excel依据指定的参数,显现Excel内置对话框。

相关阐明:
  • Dialogs(xlDialogOpen)函数的参数xlDialogOpen既能够是VB常量,也能够是数字值。
  • xlDialogOpen参数值具体见下表。
    xlDialogOpen参数值阐明
    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
------分隔线----------------------------
标签(Tag):excel excel2007 excel2010 excel2013 excel2003 excel技巧 excel实例教程
------分隔线----------------------------
引荐内容
猜你感兴趣