Built in dialog boxes
1. xlBuiltInDialogs
Make code writing easier by using existing Excel dialog boxes. Excel 2013 has 258 dialog boxes built in, and you can use any of them in your code development, depending on the context of use.
Most of the BuiltIn dialogs are based on Excel 2003 menu items, such as File > Print, or File > Save As. A complete list is provided in the figure 4 Excel Web App #1 Dialogs worksheet below.
1.1 The xlDialogPrint dialog box
To call the BuiltIn Print dialog box, the code statement is (line 3):
Code 1:
Dim Tmp As Boolean Application.Dialogs(xlDialogPrint).Show Tmp = Application.Dialogs(xlDialogPrint).Show
This will show the Print dialog box - figure 1.
1.2 The xlDialogSaveAs dialog box
To call the BuiltIn Save As dialog box, the code statement in code 2 line 1 is:
Code 2:
Application.Dialogs(xlDialogSaveAs).Show Application.Dialogs(XlBuiltInDialog.xlDialogSaveAs).Show Application.Dialogs(5).Show
Code 2, lines 1, 3, and 5 all show the Save As dialog box - figure 2. The Dialogs collection is returned by the Application object Dialogs property. Collection members are indexed by the XlBuiltInDialog constant and are identified by prefix xlDialog & dialog box name (caption) - lines 3 or index Value - line 5.

You can use all the functions in the box. When the user presses OK or cancel, they are returned to the program. Using BuiltIn dialog boxes can save a significant amount of programming effort.
2. Finding a list of xlBuiltInDialogs
2.1 The VBA Object Browser
- Use the VBA object browser
- From the VBE menu, select View > Object Browser
- Then Set Libraries to Excel
- Search for
XlBuiltInDialogto display the Members of "XlBuiltInDialog" as shown in the right panel of figure 3

- Use the list in the figure 4 Web App
- Column B lists the index Value
- Column C lists the XlBuiltInDialog member's name
The list in the Dialogs worksheet was returned by the procedure in code 3, where the Value and Name are stored in a 258 rows x 2 column array. A For...Next statement in lines 530 to 534 writes the list with the ActiveCell.Offset statement
Code 3: Sub procedure
xlDialogList. Scroll down to view the 538 lines of code.
Sub xlDialogList()
Dim i As Integer
Dim xlDialog(1 To 258, 1 To 2) As String
'' Excel 2013 xlBuiltInDialog list
xlDialog(1, 1) = 103
xlDialog(2, 1) = 476
xlDialog(3, 1) = 390
xlDialog(4, 1) = 321
xlDialog(5, 1) = 43
xlDialog(6, 1) = 133
xlDialog(7, 1) = 212
xlDialog(8, 1) = 170
xlDialog(9, 1) = 171
xlDialog(10, 1) = 12
xlDialog(11, 1) = 213
xlDialog(12, 1) = 293
xlDialog(13, 1) = 80
xlDialog(14, 1) = 323
xlDialog(15, 1) = 485
xlDialog(16, 1) = 78
xlDialog(17, 1) = 45
xlDialog(18, 1) = 32
xlDialog(19, 1) = 46
xlDialog(20, 1) = 166
xlDialog(21, 1) = 392
xlDialog(22, 1) = 527
xlDialog(23, 1) = 724
xlDialog(24, 1) = 505
xlDialog(25, 1) = 506
xlDialog(26, 1) = 540
xlDialog(27, 1) = 350
xlDialog(28, 1) = 526
xlDialog(29, 1) = 288
xlDialog(30, 1) = 435
xlDialog(31, 1) = 52
xlDialog(32, 1) = 161
xlDialog(33, 1) = 47
xlDialog(34, 1) = 73
xlDialog(35, 1) = 583
xlDialog(36, 1) = 191
xlDialog(37, 1) = 147
xlDialog(38, 1) = 108
xlDialog(39, 1) = 796
xlDialog(40, 1) = 62
xlDialog(41, 1) = 217
xlDialog(42, 1) = 1272
xlDialog(43, 1) = 276
xlDialog(44, 1) = 493
xlDialog(45, 1) = 36
xlDialog(46, 1) = 379
xlDialog(47, 1) = 723
xlDialog(48, 1) = 40
xlDialog(49, 1) = 525
xlDialog(50, 1) = 61
xlDialog(51, 1) = 229
xlDialog(52, 1) = 111
xlDialog(53, 1) = 110
xlDialog(54, 1) = 203
xlDialog(55, 1) = 27
xlDialog(56, 1) = 862
xlDialog(57, 1) = 438
xlDialog(58, 1) = 223
xlDialog(59, 1) = 54
xlDialog(60, 1) = 251
xlDialog(61, 1) = 228
xlDialog(62, 1) = 463
xlDialog(63, 1) = 464
xlDialog(64, 1) = 732
xlDialog(65, 1) = 709
xlDialog(66, 1) = 530
xlDialog(67, 1) = 35
xlDialog(68, 1) = 6
xlDialog(69, 1) = 481
xlDialog(70, 1) = 200
xlDialog(71, 1) = 301
xlDialog(72, 1) = 447
xlDialog(73, 1) = 370
xlDialog(74, 1) = 475
xlDialog(75, 1) = 26
xlDialog(76, 1) = 381
xlDialog(77, 1) = 269
xlDialog(78, 1) = 465
xlDialog(79, 1) = 423
xlDialog(80, 1) = 150
xlDialog(81, 1) = 88
xlDialog(82, 1) = 225
xlDialog(83, 1) = 128
xlDialog(84, 1) = 42
xlDialog(85, 1) = 226
xlDialog(86, 1) = 129
xlDialog(87, 1) = 89
xlDialog(88, 1) = 64
xlDialog(89, 1) = 63
xlDialog(90, 1) = 130
xlDialog(91, 1) = 450
xlDialog(92, 1) = 193
xlDialog(93, 1) = 272
xlDialog(94, 1) = 194
xlDialog(95, 1) = 195
xlDialog(96, 1) = 196
xlDialog(97, 1) = 273
xlDialog(98, 1) = 67
xlDialog(99, 1) = 68
xlDialog(100, 1) = 69
xlDialog(101, 1) = 388
xlDialog(102, 1) = 344
xlDialog(103, 1) = 70
xlDialog(104, 1) = 71
xlDialog(105, 1) = 249
xlDialog(106, 1) = 72
xlDialog(107, 1) = 198
xlDialog(108, 1) = 76
xlDialog(109, 1) = 666
xlDialog(110, 1) = 55
xlDialog(111, 1) = 596
xlDialog(112, 1) = 259
xlDialog(113, 1) = 342
xlDialog(114, 1) = 380
xlDialog(115, 1) = 436
xlDialog(116, 1) = 437
xlDialog(117, 1) = 382
xlDialog(118, 1) = 470
xlDialog(119, 1) = 339
xlDialog(120, 1) = 378
xlDialog(121, 1) = 85
xlDialog(122, 1) = 185
xlDialog(123, 1) = 1271
xlDialog(124, 1) = 322
xlDialog(125, 1) = 262
xlDialog(126, 1) = 834
xlDialog(127, 1) = 977
xlDialog(128, 1) = 119
xlDialog(129, 1) = 978
xlDialog(130, 1) = 667
xlDialog(131, 1) = 154
xlDialog(132, 1) = 207
xlDialog(133, 1) = 214
xlDialog(134, 1) = 1
xlDialog(135, 1) = 2
xlDialog(136, 1) = 188
xlDialog(137, 1) = 441
xlDialog(138, 1) = 318
xlDialog(139, 1) = 325
xlDialog(140, 1) = 319
xlDialog(141, 1) = 356
xlDialog(142, 1) = 458
xlDialog(143, 1) = 647
xlDialog(144, 1) = 355
xlDialog(145, 1) = 320
xlDialog(146, 1) = 142
xlDialog(147, 1) = 86
xlDialog(148, 1) = 186
xlDialog(149, 1) = 7
xlDialog(150, 1) = 91
xlDialog(151, 1) = 58
xlDialog(152, 1) = 53
xlDialog(153, 1) = 84
xlDialog(154, 1) = 832
xlDialog(155, 1) = 656
xlDialog(156, 1) = 570
xlDialog(157, 1) = 572
xlDialog(158, 1) = 689
xlDialog(159, 1) = 433
xlDialog(160, 1) = 313
xlDialog(161, 1) = 434
xlDialog(162, 1) = 421
xlDialog(163, 1) = 568
xlDialog(164, 1) = 567
xlDialog(165, 1) = 1183
xlDialog(166, 1) = 1153
xlDialog(167, 1) = 312
xlDialog(168, 1) = 300
xlDialog(169, 1) = 8
xlDialog(170, 1) = 9
xlDialog(171, 1) = 222
xlDialog(172, 1) = 202
xlDialog(173, 1) = 474
xlDialog(174, 1) = 754
xlDialog(175, 1) = 28
xlDialog(176, 1) = 620
xlDialog(177, 1) = 653
xlDialog(178, 1) = 445
xlDialog(179, 1) = 1258
xlDialog(180, 1) = 134
xlDialog(181, 1) = 127
xlDialog(182, 1) = 17
xlDialog(183, 1) = 5
xlDialog(184, 1) = 456
xlDialog(185, 1) = 208
xlDialog(186, 1) = 145
xlDialog(187, 1) = 285
xlDialog(188, 1) = 87
xlDialog(189, 1) = 307
xlDialog(190, 1) = 305
xlDialog(191, 1) = 308
xlDialog(192, 1) = 473
xlDialog(193, 1) = 311
xlDialog(194, 1) = 420
xlDialog(195, 1) = 731
xlDialog(196, 1) = 132
xlDialog(197, 1) = 189
xlDialog(198, 1) = 460
xlDialog(199, 1) = 557
xlDialog(200, 1) = 466
xlDialog(201, 1) = 504
xlDialog(202, 1) = 461
xlDialog(203, 1) = 462
xlDialog(204, 1) = 509
xlDialog(205, 1) = 1109
xlDialog(206, 1) = 1208
xlDialog(207, 1) = 23
xlDialog(208, 1) = 1108
xlDialog(209, 1) = 1107
xlDialog(210, 1) = 159
xlDialog(211, 1) = 204
xlDialog(212, 1) = 220
xlDialog(213, 1) = 261
xlDialog(214, 1) = 1182
xlDialog(215, 1) = 1184
xlDialog(216, 1) = 1179
xlDialog(217, 1) = 39
xlDialog(218, 1) = 192
xlDialog(219, 1) = 1134
xlDialog(220, 1) = 1133
xlDialog(221, 1) = 1135
xlDialog(222, 1) = 137
xlDialog(223, 1) = 190
xlDialog(224, 1) = 472
xlDialog(225, 1) = 44
xlDialog(226, 1) = 218
xlDialog(227, 1) = 398
xlDialog(228, 1) = 474
xlDialog(229, 1) = 41
xlDialog(230, 1) = 394
xlDialog(231, 1) = 422
xlDialog(232, 1) = 94
xlDialog(233, 1) = 201
xlDialog(234, 1) = 328
xlDialog(235, 1) = 478
xlDialog(236, 1) = 330
xlDialog(237, 1) = 197
xlDialog(238, 1) = 773
xlDialog(239, 1) = 686
xlDialog(240, 1) = 684
xlDialog(241, 1) = 687
xlDialog(242, 1) = 683
xlDialog(243, 1) = 685
xlDialog(244, 1) = 14
xlDialog(245, 1) = 13
xlDialog(246, 1) = 281
xlDialog(247, 1) = 283
xlDialog(248, 1) = 354
xlDialog(249, 1) = 282
xlDialog(250, 1) = 386
xlDialog(251, 1) = 302
xlDialog(252, 1) = 284
xlDialog(253, 1) = 417
xlDialog(254, 1) = 415
xlDialog(255, 1) = 384
xlDialog(256, 1) = 199
xlDialog(257, 1) = 95
xlDialog(258, 1) = 256
xlDialog(1, 2) = "xlDialogActivate"
xlDialog(2, 2) = "xlDialogActiveCellFont"
xlDialog(3, 2) = "xlDialogAddChartAutoformat"
xlDialog(4, 2) = "xlDialogAddinManager"
xlDialog(5, 2) = "xlDialogAlignment"
xlDialog(6, 2) = "xlDialogApplyNames"
xlDialog(7, 2) = "xlDialogApplyStyle"
xlDialog(8, 2) = "xlDialogAppMove"
xlDialog(9, 2) = "xlDialogAppSize"
xlDialog(10, 2) = "xlDialogArrangeAll"
xlDialog(11, 2) = "xlDialogAssignToObject"
xlDialog(12, 2) = "xlDialogAssignToTool"
xlDialog(13, 2) = "xlDialogAttachText"
xlDialog(14, 2) = "xlDialogAttachToolbars"
xlDialog(15, 2) = "xlDialogAutoCorrect"
xlDialog(16, 2) = "xlDialogAxes"
xlDialog(17, 2) = "xlDialogBorder"
xlDialog(18, 2) = "xlDialogCalculation"
xlDialog(19, 2) = "xlDialogCellProtection"
xlDialog(20, 2) = "xlDialogChangeLink"
xlDialog(21, 2) = "xlDialogChartAddData"
xlDialog(22, 2) = "xlDialogChartLocation"
xlDialog(23, 2) = "xlDialogChartOptionsDataLabelMultiple"
xlDialog(24, 2) = "xlDialogChartOptionsDataLabels"
xlDialog(25, 2) = "xlDialogChartOptionsDataTable"
xlDialog(26, 2) = "xlDialogChartSourceData"
xlDialog(27, 2) = "xlDialogChartTrend"
xlDialog(28, 2) = "xlDialogChartType"
xlDialog(29, 2) = "xlDialogChartWizard"
xlDialog(30, 2) = "xlDialogCheckboxProperties"
xlDialog(31, 2) = "xlDialogClear"
xlDialog(32, 2) = "xlDialogColorPalette"
xlDialog(33, 2) = "xlDialogColumnWidth"
xlDialog(34, 2) = "xlDialogCombination"
xlDialog(35, 2) = "xlDialogConditionalFormatting"
xlDialog(36, 2) = "xlDialogConsolidate"
xlDialog(37, 2) = "xlDialogCopyChart"
xlDialog(38, 2) = "xlDialogCopyPicture"
xlDialog(39, 2) = "xlDialogCreateList"
xlDialog(40, 2) = "xlDialogCreateNames"
xlDialog(41, 2) = "xlDialogCreatePublisher"
xlDialog(42, 2) = "xlDialogCreateRelationship"
xlDialog(43, 2) = "xlDialogCustomizeToolbar"
xlDialog(44, 2) = "xlDialogCustomViews"
xlDialog(45, 2) = "xlDialogDataDelete"
xlDialog(46, 2) = "xlDialogDataLabel"
xlDialog(47, 2) = "xlDialogDataLabelMultiple"
xlDialog(48, 2) = "xlDialogDataSeries"
xlDialog(49, 2) = "xlDialogDataValidation"
xlDialog(50, 2) = "xlDialogDefineName"
xlDialog(51, 2) = "xlDialogDefineStyle"
xlDialog(52, 2) = "xlDialogDeleteFormat"
xlDialog(53, 2) = "xlDialogDeleteName"
xlDialog(54, 2) = "xlDialogDemote"
xlDialog(55, 2) = "xlDialogDisplay"
xlDialog(56, 2) = "xlDialogDocumentInspector"
xlDialog(57, 2) = "xlDialogEditboxProperties"
xlDialog(58, 2) = "xlDialogEditColor"
xlDialog(59, 2) = "xlDialogEditDelete"
xlDialog(60, 2) = "xlDialogEditionOptions"
xlDialog(61, 2) = "xlDialogEditSeries"
xlDialog(62, 2) = "xlDialogErrorbarX"
xlDialog(63, 2) = "xlDialogErrorbarY"
xlDialog(64, 2) = "xlDialogErrorChecking"
xlDialog(65, 2) = "xlDialogEvaluateFormula"
xlDialog(66, 2) = "xlDialogExternalDataProperties"
xlDialog(67, 2) = "xlDialogExtract"
xlDialog(68, 2) = "xlDialogFileDelete"
xlDialog(69, 2) = "xlDialogFileSharing"
xlDialog(70, 2) = "xlDialogFillGroup"
xlDialog(71, 2) = "xlDialogFillWorkgroup"
xlDialog(72, 2) = "xlDialogFilter"
xlDialog(73, 2) = "xlDialogFilterAdvanced"
xlDialog(74, 2) = "xlDialogFindFile"
xlDialog(75, 2) = "xlDialogFont"
xlDialog(76, 2) = "xlDialogFontProperties"
xlDialog(77, 2) = "xlDialogFormatAuto"
xlDialog(78, 2) = "xlDialogFormatChart"
xlDialog(79, 2) = "xlDialogFormatCharttype"
xlDialog(80, 2) = "xlDialogFormatFont"
xlDialog(81, 2) = "xlDialogFormatLegend"
xlDialog(82, 2) = "xlDialogFormatMain"
xlDialog(83, 2) = "xlDialogFormatMove"
xlDialog(84, 2) = "xlDialogFormatNumber"
xlDialog(85, 2) = "xlDialogFormatOverlay"
xlDialog(86, 2) = "xlDialogFormatSize"
xlDialog(87, 2) = "xlDialogFormatText"
xlDialog(88, 2) = "xlDialogFormulaFind"
xlDialog(89, 2) = "xlDialogFormulaGoto"
xlDialog(90, 2) = "xlDialogFormulaReplace"
xlDialog(91, 2) = "xlDialogFunctionWizard"
xlDialog(92, 2) = "xlDialogGallery3dArea"
xlDialog(93, 2) = "xlDialogGallery3dBar"
xlDialog(94, 2) = "xlDialogGallery3dColumn"
xlDialog(95, 2) = "xlDialogGallery3dLine"
xlDialog(96, 2) = "xlDialogGallery3dPie"
xlDialog(97, 2) = "xlDialogGallery3dSurface"
xlDialog(98, 2) = "xlDialogGalleryArea"
xlDialog(99, 2) = "xlDialogGalleryBar"
xlDialog(100, 2) = "xlDialogGalleryColumn"
xlDialog(101, 2) = "xlDialogGalleryCustom"
xlDialog(102, 2) = "xlDialogGalleryDoughnut"
xlDialog(103, 2) = "xlDialogGalleryLine"
xlDialog(104, 2) = "xlDialogGalleryPie"
xlDialog(105, 2) = "xlDialogGalleryRadar"
xlDialog(106, 2) = "xlDialogGalleryScatter"
xlDialog(107, 2) = "xlDialogGoalSeek"
xlDialog(108, 2) = "xlDialogGridlines"
xlDialog(109, 2) = "xlDialogImportTextFile"
xlDialog(110, 2) = "xlDialogInsert"
xlDialog(111, 2) = "xlDialogInsertHyperlink"
xlDialog(112, 2) = "xlDialogInsertObject"
xlDialog(113, 2) = "xlDialogInsertPicture"
xlDialog(114, 2) = "xlDialogInsertTitle"
xlDialog(115, 2) = "xlDialogLabelProperties"
xlDialog(116, 2) = "xlDialogListboxProperties"
xlDialog(117, 2) = "xlDialogMacroOptions"
xlDialog(118, 2) = "xlDialogMailEditMailer"
xlDialog(119, 2) = "xlDialogMailLogon"
xlDialog(120, 2) = "xlDialogMailNextLetter"
xlDialog(121, 2) = "xlDialogMainChart"
xlDialog(122, 2) = "xlDialogMainChartType"
xlDialog(123, 2) = "xlDialogManageRelationships"
xlDialog(124, 2) = "xlDialogMenuEditor"
xlDialog(125, 2) = "xlDialogMove"
xlDialog(126, 2) = "xlDialogMyPermission"
xlDialog(127, 2) = "xlDialogNameManager"
xlDialog(128, 2) = "xlDialogNew"
xlDialog(129, 2) = "xlDialogNewName"
xlDialog(130, 2) = "xlDialogNewWebQuery"
xlDialog(131, 2) = "xlDialogNote"
xlDialog(132, 2) = "xlDialogObjectProperties"
xlDialog(133, 2) = "xlDialogObjectProtection"
xlDialog(134, 2) = "xlDialogOpen"
xlDialog(135, 2) = "xlDialogOpenLinks"
xlDialog(136, 2) = "xlDialogOpenMail"
xlDialog(137, 2) = "xlDialogOpenText"
xlDialog(138, 2) = "xlDialogOptionsCalculation"
xlDialog(139, 2) = "xlDialogOptionsChart"
xlDialog(140, 2) = "xlDialogOptionsEdit"
xlDialog(141, 2) = "xlDialogOptionsGeneral"
xlDialog(142, 2) = "xlDialogOptionsListsAdd"
xlDialog(143, 2) = "xlDialogOptionsME"
xlDialog(144, 2) = "xlDialogOptionsTransition"
xlDialog(145, 2) = "xlDialogOptionsView"
xlDialog(146, 2) = "xlDialogOutline"
xlDialog(147, 2) = "xlDialogOverlay"
xlDialog(148, 2) = "xlDialogOverlayChartType"
xlDialog(149, 2) = "xlDialogPageSetup"
xlDialog(150, 2) = "xlDialogParse"
xlDialog(151, 2) = "xlDialogPasteNames"
xlDialog(152, 2) = "xlDialogPasteSpecial"
xlDialog(153, 2) = "xlDialogPatterns"
xlDialog(154, 2) = "xlDialogPermission"
xlDialog(155, 2) = "xlDialogPhonetic"
xlDialog(156, 2) = "xlDialogPivotCalculatedField"
xlDialog(157, 2) = "xlDialogPivotCalculatedItem"
xlDialog(158, 2) = "xlDialogPivotClientServerSet"
xlDialog(159, 2) = "xlDialogPivotFieldGroup"
xlDialog(160, 2) = "xlDialogPivotFieldProperties"
xlDialog(161, 2) = "xlDialogPivotFieldUngroup"
xlDialog(162, 2) = "xlDialogPivotShowPages"
xlDialog(163, 2) = "xlDialogPivotSolveOrder"
xlDialog(164, 2) = "xlDialogPivotTableOptions"
xlDialog(165, 2) = "xlDialogPivotTableSlicerConnections"
xlDialog(166, 2) = "xlDialogPivotTableWhatIfAnalysisSettings"
xlDialog(167, 2) = "xlDialogPivotTableWizard"
xlDialog(168, 2) = "xlDialogPlacement"
xlDialog(169, 2) = "xlDialogPrint"
xlDialog(170, 2) = "xlDialogPrinterSetup"
xlDialog(171, 2) = "xlDialogPrintPreview"
xlDialog(172, 2) = "xlDialogPromote"
xlDialog(173, 2) = "xlDialogProperties"
xlDialog(174, 2) = "xlDialogPropertyFields"
xlDialog(175, 2) = "xlDialogProtectDocument"
xlDialog(176, 2) = "xlDialogProtectSharing"
xlDialog(177, 2) = "xlDialogPublishAsWebPage"
xlDialog(178, 2) = "xlDialogPushbuttonProperties"
xlDialog(179, 2) = "xlDialogRecommendedPivotTables"
xlDialog(180, 2) = "xlDialogReplaceFont"
xlDialog(181, 2) = "xlDialogRowHeight"
xlDialog(182, 2) = "xlDialogRun"
xlDialog(183, 2) = "xlDialogSaveAs"
xlDialog(184, 2) = "xlDialogSaveCopyAs"
xlDialog(185, 2) = "xlDialogSaveNewObject"
xlDialog(186, 2) = "xlDialogSaveWorkbook"
xlDialog(187, 2) = "xlDialogSaveWorkspace"
xlDialog(188, 2) = "xlDialogScale"
xlDialog(189, 2) = "xlDialogScenarioAdd"
xlDialog(190, 2) = "xlDialogScenarioCells"
xlDialog(191, 2) = "xlDialogScenarioEdit"
xlDialog(192, 2) = "xlDialogScenarioMerge"
xlDialog(193, 2) = "xlDialogScenarioSummary"
xlDialog(194, 2) = "xlDialogScrollbarProperties"
xlDialog(195, 2) = "xlDialogSearch"
xlDialog(196, 2) = "xlDialogSelectSpecial"
xlDialog(197, 2) = "xlDialogSendMail"
xlDialog(198, 2) = "xlDialogSeriesAxes"
xlDialog(199, 2) = "xlDialogSeriesOptions"
xlDialog(200, 2) = "xlDialogSeriesOrder"
xlDialog(201, 2) = "xlDialogSeriesShape"
xlDialog(202, 2) = "xlDialogSeriesX"
xlDialog(203, 2) = "xlDialogSeriesY"
xlDialog(204, 2) = "xlDialogSetBackgroundPicture"
xlDialog(205, 2) = "xlDialogSetManager"
xlDialog(206, 2) = "xlDialogSetMDXEditor"
xlDialog(207, 2) = "xlDialogSetPrintTitles"
xlDialog(208, 2) = "xlDialogSetTupleEditorOnColumns"
xlDialog(209, 2) = "xlDialogSetTupleEditorOnRows"
xlDialog(210, 2) = "xlDialogSetUpdateStatus"
xlDialog(211, 2) = "xlDialogShowDetail"
xlDialog(212, 2) = "xlDialogShowToolbar"
xlDialog(213, 2) = "xlDialogSize"
xlDialog(214, 2) = "xlDialogSlicerCreation"
xlDialog(215, 2) = "xlDialogSlicerPivotTableConnections"
xlDialog(216, 2) = "xlDialogSlicerSettings"
xlDialog(217, 2) = "xlDialogSort"
xlDialog(218, 2) = "xlDialogSortSpecial"
xlDialog(219, 2) = "xlDialogSparklineInsertColumn"
xlDialog(220, 2) = "xlDialogSparklineInsertLine"
xlDialog(221, 2) = "xlDialogSparklineInsertWinLoss"
xlDialog(222, 2) = "xlDialogSplit"
xlDialog(223, 2) = "xlDialogStandardFont"
xlDialog(224, 2) = "xlDialogStandardWidth"
xlDialog(225, 2) = "xlDialogStyle"
xlDialog(226, 2) = "xlDialogSubscribeTo"
xlDialog(227, 2) = "xlDialogSubtotalCreate"
xlDialog(228, 2) = "xlDialogSummaryInfo"
xlDialog(229, 2) = "xlDialogTable"
xlDialog(230, 2) = "xlDialogTabOrder"
xlDialog(231, 2) = "xlDialogTextToColumns"
xlDialog(232, 2) = "xlDialogUnhide"
xlDialog(233, 2) = "xlDialogUpdateLink"
xlDialog(234, 2) = "xlDialogVbaInsertFile"
xlDialog(235, 2) = "xlDialogVbaMakeAddin"
xlDialog(236, 2) = "xlDialogVbaProcedureDefinition"
xlDialog(237, 2) = "xlDialogView3d"
xlDialog(238, 2) = "xlDialogWebOptionsBrowsers"
xlDialog(239, 2) = "xlDialogWebOptionsEncoding"
xlDialog(240, 2) = "xlDialogWebOptionsFiles"
xlDialog(241, 2) = "xlDialogWebOptionsFonts"
xlDialog(242, 2) = "xlDialogWebOptionsGeneral"
xlDialog(243, 2) = "xlDialogWebOptionsPictures"
xlDialog(244, 2) = "xlDialogWindowMove"
xlDialog(245, 2) = "xlDialogWindowSize"
xlDialog(246, 2) = "xlDialogWorkbookAdd"
xlDialog(247, 2) = "xlDialogWorkbookCopy"
xlDialog(248, 2) = "xlDialogWorkbookInsert"
xlDialog(249, 2) = "xlDialogWorkbookMove"
xlDialog(250, 2) = "xlDialogWorkbookName"
xlDialog(251, 2) = "xlDialogWorkbookNew"
xlDialog(252, 2) = "xlDialogWorkbookOptions"
xlDialog(253, 2) = "xlDialogWorkbookProtect"
xlDialog(254, 2) = "xlDialogWorkbookTabSplit"
xlDialog(255, 2) = "xlDialogWorkbookUnhide"
xlDialog(256, 2) = "xlDialogWorkgroup"
xlDialog(257, 2) = "xlDialogWorkspace"
xlDialog(258, 2) = "xlDialogZoom"
With ActiveCell
.Offset(0, 0) = "Value"
.Offset(0, 0).HorizontalAlignment = xlRight
.Offset(0, 1) = "Name"
.Offset(i, 1).IndentLevel = 1
For i = LBound(xlDialog) To UBound(xlDialog)
.Offset(i, 0).Value = xlDialog(i, 1)
.Offset(i, 1).Value = xlDialog(i, 2)
.Offset(i, 1).IndentLevel = 1
Next i
End With
End Sub
2.2 The xlDialogWorkspace dialog box
A list of Built-In Dialog Box Arguments is available at the Office Dev Center site: Built-In Dialog Box Argument Lists. The xlDialogWorkspace dialog box demonstrated here, has 16 listed arguments. Details are shown in the Code 2 window. In Line 7, arguments are passed by Name, and in Line 10 arguments are passed by Position. A comma marks each position.
Code 2: Sub
xlDialogWspace shows the xlDialogWorkspace box - with arguments, by Name and Position
Sub xlDialogWspace()
'' Arg1: fixed; Arg2: decimals; Arg3: r1c1; Arg4: scroll; Arg5: status; Arg6: formula;
'' Arg7: menu_key; Arg8: remote; Arg9 :entermove; Arg10:underlines; Arg11: tools;
'' Arg12: notes; Arg13: nav_keys; Arg14: menu_key_action; Arg15: drag_drop; Arg16: show_info
'' Set Wspace - parameters by Name
Application.Dialogs(xlDialogWorkspace).Show Arg3:=True, Arg4:=False, Arg5:=False, Arg6:=False
'' Reset Wspace - parameters by Position
Application.Dialogs(xlDialogWorkspace).Show , , False, True, True, True
End Sub
The arguments are:
- Arg3: Display - R1C1
- Arg4: Display - Scroll bars
- Arg5: Display - Status bar
- Arg6: Display - Formula bar
and the line 7 code result is in figure 5 (left pane), and the line 10 code result in figure 5 (right pane).

- This example was developed in Excel 2013, and VBA 7.1
- Revised: Saturday 25th of February 2023 - 09:37 AM, [Australian Eastern Standard Time (EST)]
