<em id="pj4oa"><acronym id="pj4oa"></acronym></em><button id="pj4oa"><object id="pj4oa"></object></button>
<progress id="pj4oa"><track id="pj4oa"><rt id="pj4oa"></rt></track></progress>

    <dd id="pj4oa"></dd>
    <th id="pj4oa"></th>

    返回首頁
    當前位置: 主頁 > Excel教程 > Excel VBA教程 >

    如何顯示Excel內置對話框

    時間:2015-06-23 22:43來源:Office教程學習網 www.tin22.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教程 excel實例教程
    ------分隔線----------------------------
    推薦內容
    猜你感興趣
    五月婷婷福利