Microsoft Office Excel ® Kod Kılavuzu

Microsoft Office Excel® Code Guide

2 Temmuz 2003 Çarşamba

Built-in Dialog Box Argument Lists





'UserForm1

'Add Tools on UserForm1: Label1...4, ListBox1, CheckBox1...5, TextBox1...5
Option Explicit
Dim i As Single
Dim No As Double, Seçim As Double
Dim Bulgu As Variant

Private Sub UserForm_Initialize()
On Error Resume Next
Me.Caption = "[PBİD®]Built-in Dialog Box Argument Lists"
Application.Visible = True
With ListBox1
.ColumnCount = 4
.ColumnWidths = "36;48;132;640"
End With
Call DialogListesiOluştur
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
On Error Resume Next
Application.Visible = True
End Sub
Private Sub ListBox1_Click()
On Error GoTo 0
TextBox1.Value = "": TextBox2.Value = "": TextBox3.Value = "": TextBox4.Value = "": TextBox5.Value = ""
CheckBox1.Value = False: CheckBox2.Value = False: CheckBox3.Value = False: CheckBox4.Value = False: CheckBox5.Value = False
No = ListBox1.ListIndex
Seçim = ListBox1.List(No, 1)
On Error GoTo D1: Bulgu = Application.Dialogs(Seçim): CheckBox1.Value = True: TextBox1.Value = Bulgu
D1: On Error GoTo D2: Bulgu = Application.Dialogs(Seçim).Application: CheckBox2.Value = True: TextBox2.Value = Bulgu
D2: On Error GoTo D3: Bulgu = Application.Dialogs(Seçim).Creator: CheckBox3.Value = True: TextBox3.Value = Bulgu
D3: On Error GoTo D4: Bulgu = Application.Dialogs(Seçim).Parent: CheckBox4.Value = True: TextBox4.Value = Bulgu
D4: On Error GoTo D5: Bulgu = Application.Dialogs(Seçim).Show: CheckBox5.Value = True: TextBox5.Value = Bulgu: Exit Sub
D5: Err.Clear: TextBox1.Value = ""
End Sub
Sub DialogListesiOluştur() '[Built-in Dialog Box Argument Lists]
On Error Resume Next
ListBox1.AddItem 1: ListBox1.List(No, 1) = xlDialogActivate: ListBox1.List(No, 2) = "xlDialogActivate": ListBox1.List(No, 3) = "window_text, pane_num": No = No + 1
ListBox1.AddItem 2: ListBox1.List(No, 1) = xlDialogActiveCellFont: ListBox1.List(No, 2) = "xlDialogActiveCellFont": ListBox1.List(No, 3) = "font, font_style, size, strikethrough, superscript, subscript, outline, shadow, underline, color, normal, background, start_char, char_count": No = No + 1
ListBox1.AddItem 3: ListBox1.List(No, 1) = xlDialogAddChartAutoformat: ListBox1.List(No, 2) = "xlDialogAddChartAutoformat": ListBox1.List(No, 3) = "name_text, desc_text": No = No + 1
ListBox1.AddItem 4: ListBox1.List(No, 1) = xlDialogAddinManager: ListBox1.List(No, 2) = "xlDialogAddinManager": ListBox1.List(No, 3) = "operation_num, addinname_text, copy_logical": No = No + 1
ListBox1.AddItem 5: ListBox1.List(No, 1) = xlDialogAlignment: ListBox1.List(No, 2) = "xlDialogAlignment": ListBox1.List(No, 3) = "horiz_align, wrap, vert_align, orientation, add_indent": No = No + 1
ListBox1.AddItem 6: ListBox1.List(No, 1) = xlDialogApplyNames: ListBox1.List(No, 2) = "xlDialogApplyNames": ListBox1.List(No, 3) = "name_array, ignore, use_rowcol, omit_col, omit_row, order_num, append_last": No = No + 1
ListBox1.AddItem 7: ListBox1.List(No, 1) = xlDialogApplyStyle: ListBox1.List(No, 2) = "xlDialogApplyStyle": ListBox1.List(No, 3) = "style_text": No = No + 1
ListBox1.AddItem 8: ListBox1.List(No, 1) = xlDialogAppMove: ListBox1.List(No, 2) = "xlDialogAppMove": ListBox1.List(No, 3) = "x_num, y_num": No = No + 1
ListBox1.AddItem 9: ListBox1.List(No, 1) = xlDialogAppSize: ListBox1.List(No, 2) = "xlDialogAppSize": ListBox1.List(No, 3) = "x_num, y_num": No = No + 1
ListBox1.AddItem 10: ListBox1.List(No, 1) = xlDialogArrangeAll: ListBox1.List(No, 2) = "xlDialogArrangeAll": ListBox1.List(No, 3) = "arrange_num, active_doc, sync_horiz, sync_vert": No = No + 1
ListBox1.AddItem 11: ListBox1.List(No, 1) = xlDialogAssignToObject: ListBox1.List(No, 2) = "xlDialogAssignToObject": ListBox1.List(No, 3) = "macro_ref": No = No + 1
ListBox1.AddItem 12: ListBox1.List(No, 1) = xlDialogAssignToTool: ListBox1.List(No, 2) = "xlDialogAssignToTool": ListBox1.List(No, 3) = "bar_id, position, macro_ref": No = No + 1
ListBox1.AddItem 13: ListBox1.List(No, 1) = xlDialogAttachText: ListBox1.List(No, 2) = "xlDialogAttachText": ListBox1.List(No, 3) = "attach_to_num, series_num, point_num": No = No + 1
ListBox1.AddItem 14: ListBox1.List(No, 1) = xlDialogAttachToolbars: ListBox1.List(No, 2) = "xlDialogAttachToolbars": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 15: ListBox1.List(No, 1) = xlDialogAutoCorrect: ListBox1.List(No, 2) = "xlDialogAutoCorrect": ListBox1.List(No, 3) = "correct_initial_caps, capitalize_days": No = No + 1
ListBox1.AddItem 16: ListBox1.List(No, 1) = xlDialogAxes: ListBox1.List(No, 2) = "xlDialogAxes": ListBox1.List(No, 3) = "x_primary, y_primary, x_secondary, y_secondary": No = No + 1
ListBox1.AddItem 17: ListBox1.List(No, 1) = xlDialogAxes: ListBox1.List(No, 2) = "xlDialogAxes": ListBox1.List(No, 3) = "x_primary, y_primary, z_primary": No = No + 1
ListBox1.AddItem 18: ListBox1.List(No, 1) = xlDialogBorder: ListBox1.List(No, 2) = "xlDialogBorder": ListBox1.List(No, 3) = "outline, left, right, top, bottom, shade, outline_color, left_color, right_color, top_color, bottom_color": No = No + 1
ListBox1.AddItem 19: ListBox1.List(No, 1) = xlDialogCalculation: ListBox1.List(No, 2) = "xlDialogCalculation": ListBox1.List(No, 3) = "type_num, iter, max_num, max_change, update, precision, date_1904, calc_save, save_values, alt_exp, alt_form": No = No + 1
ListBox1.AddItem 20: ListBox1.List(No, 1) = xlDialogCellProtection: ListBox1.List(No, 2) = "xlDialogCellProtection": ListBox1.List(No, 3) = "locked, hidden": No = No + 1
ListBox1.AddItem 21: ListBox1.List(No, 1) = xlDialogChangeLink: ListBox1.List(No, 2) = "xlDialogChangeLink": ListBox1.List(No, 3) = "old_text, new_text, type_of_link": No = No + 1
ListBox1.AddItem 22: ListBox1.List(No, 1) = xlDialogChartAddData: ListBox1.List(No, 2) = "xlDialogChartAddData": ListBox1.List(No, 3) = "ref, rowcol, titles, categories, replace, series": No = No + 1
ListBox1.AddItem 23: ListBox1.List(No, 1) = xlDialogChartLocation: ListBox1.List(No, 2) = "xlDialogChartLocation": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 24: ListBox1.List(No, 1) = xlDialogChartOptionsDataLabels: ListBox1.List(No, 2) = "xlDialogChartOptionsDataLabels": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 25: ListBox1.List(No, 1) = xlDialogChartOptionsDataTable: ListBox1.List(No, 2) = "xlDialogChartOptionsDataTable": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 26: ListBox1.List(No, 1) = xlDialogChartSourceData: ListBox1.List(No, 2) = "xlDialogChartSourceData": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 27: ListBox1.List(No, 1) = xlDialogChartTrend: ListBox1.List(No, 2) = "xlDialogChartTrend": ListBox1.List(No, 3) = "type, ord_per, forecast, backcast, intercept, equation, r_squared, name": No = No + 1
ListBox1.AddItem 28: ListBox1.List(No, 1) = xlDialogChartType: ListBox1.List(No, 2) = "xlDialogChartType": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 29: ListBox1.List(No, 1) = xlDialogChartWizard: ListBox1.List(No, 2) = "xlDialogChartWizard": ListBox1.List(No, 3) = "long, ref, gallery_num, type_num, plot_by, categories, ser_titles, legend, title, x_title, y_title, z_title, number_cats, number_titles": No = No + 1
ListBox1.AddItem 30: ListBox1.List(No, 1) = xlDialogCheckboxProperties: ListBox1.List(No, 2) = "xlDialogCheckboxProperties": ListBox1.List(No, 3) = "value, link, accel_text, accel2_text, 3d_shading": No = No + 1
ListBox1.AddItem 31: ListBox1.List(No, 1) = xlDialogClear: ListBox1.List(No, 2) = "xlDialogClear": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 32: ListBox1.List(No, 1) = xlDialogColorPalette: ListBox1.List(No, 2) = "xlDialogColorPalette": ListBox1.List(No, 3) = "file_text": No = No + 1
ListBox1.AddItem 33: ListBox1.List(No, 1) = xlDialogColumnWidth: ListBox1.List(No, 2) = "xlDialogColumnWidth": ListBox1.List(No, 3) = "width_num, reference, standard, type_num, standard_num": No = No + 1
ListBox1.AddItem 34: ListBox1.List(No, 1) = xlDialogCombination: ListBox1.List(No, 2) = "xlDialogCombination": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 35: ListBox1.List(No, 1) = xlDialogConditionalFormatting: ListBox1.List(No, 2) = "xlDialogConditionalFormatting": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 36: ListBox1.List(No, 1) = xlDialogConsolidate: ListBox1.List(No, 2) = "xlDialogConsolidate": ListBox1.List(No, 3) = "source_refs, function_num, top_row, left_col, create_links": No = No + 1
ListBox1.AddItem 37: ListBox1.List(No, 1) = xlDialogCopyChart: ListBox1.List(No, 2) = "xlDialogCopyChart": ListBox1.List(No, 3) = "size_num": No = No + 1
ListBox1.AddItem 38: ListBox1.List(No, 1) = xlDialogCopyPicture: ListBox1.List(No, 2) = "xlDialogCopyPicture": ListBox1.List(No, 3) = "appearance_num, size_num, type_num": No = No + 1
ListBox1.AddItem 39: ListBox1.List(No, 1) = xlDialogCreateNames: ListBox1.List(No, 2) = "xlDialogCreateNames": ListBox1.List(No, 3) = "top, left, bottom, right": No = No + 1
ListBox1.AddItem 40: ListBox1.List(No, 1) = xlDialogCreatePublisher: ListBox1.List(No, 2) = "xlDialogCreatePublisher": ListBox1.List(No, 3) = "file_text, appearance, size, formats": No = No + 1
ListBox1.AddItem 41: ListBox1.List(No, 1) = xlDialogCustomizeToolbar: ListBox1.List(No, 2) = "xlDialogCustomizeToolbar": ListBox1.List(No, 3) = "category": No = No + 1
ListBox1.AddItem 42: ListBox1.List(No, 1) = xlDialogCustomViews: ListBox1.List(No, 2) = "xlDialogCustomViews": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 43: ListBox1.List(No, 1) = xlDialogDataDelete: ListBox1.List(No, 2) = "xlDialogDataDelete": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 44: ListBox1.List(No, 1) = xlDialogDataLabel: ListBox1.List(No, 2) = "xlDialogDataLabel": ListBox1.List(No, 3) = "show_option, auto_text, show_key": No = No + 1
ListBox1.AddItem 45: ListBox1.List(No, 1) = xlDialogDataSeries: ListBox1.List(No, 2) = "xlDialogDataSeries": ListBox1.List(No, 3) = "rowcol, type_num, date_num, step_value, stop_value, trend": No = No + 1
ListBox1.AddItem 46: ListBox1.List(No, 1) = xlDialogDataValidation: ListBox1.List(No, 2) = "xlDialogDataValidation": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 47: ListBox1.List(No, 1) = xlDialogDefineName: ListBox1.List(No, 2) = "xlDialogDefineName": ListBox1.List(No, 3) = "name_text, refers_to, macro_type, shortcut_text, hidden, category, local": No = No + 1
ListBox1.AddItem 48: ListBox1.List(No, 1) = xlDialogDefineStyle: ListBox1.List(No, 2) = "xlDialogDefineStyle": ListBox1.List(No, 3) = "style_text, number, font, alignment, border, pattern, protection": No = No + 1
ListBox1.AddItem 49: ListBox1.List(No, 1) = xlDialogDefineStyle: ListBox1.List(No, 2) = "xlDialogDefineStyle": ListBox1.List(No, 3) = "style_text, attribute_num, additional_def_args, ...": No = No + 1
ListBox1.AddItem 50: ListBox1.List(No, 1) = xlDialogDeleteFormat: ListBox1.List(No, 2) = "xlDialogDeleteFormat": ListBox1.List(No, 3) = "format_text": No = No + 1
ListBox1.AddItem 51: ListBox1.List(No, 1) = xlDialogDeleteName: ListBox1.List(No, 2) = "xlDialogDeleteName": ListBox1.List(No, 3) = "name_text": No = No + 1
ListBox1.AddItem 52: ListBox1.List(No, 1) = xlDialogDemote: ListBox1.List(No, 2) = "xlDialogDemote": ListBox1.List(No, 3) = "row_col": No = No + 1
ListBox1.AddItem 53: ListBox1.List(No, 1) = xlDialogDisplay: ListBox1.List(No, 2) = "xlDialogDisplay": ListBox1.List(No, 3) = "formulas, gridlines, headings, zeros, color_num, reserved, outline, page_breaks, object_num": No = No + 1
ListBox1.AddItem 54: ListBox1.List(No, 1) = xlDialogDisplay: ListBox1.List(No, 2) = "xlDialogDisplay": ListBox1.List(No, 3) = "cell, formula, value, format, protection, names, precedents, dependents, note": No = No + 1
ListBox1.AddItem 55: ListBox1.List(No, 1) = xlDialogEditboxProperties: ListBox1.List(No, 2) = "xlDialogEditboxProperties": ListBox1.List(No, 3) = "validation_num, multiline_logical, vscroll_logical, password_logical": No = No + 1
ListBox1.AddItem 56: ListBox1.List(No, 1) = xlDialogEditColor: ListBox1.List(No, 2) = "xlDialogEditColor": ListBox1.List(No, 3) = "color_num, red_value, green_value, blue_value": No = No + 1
ListBox1.AddItem 57: ListBox1.List(No, 1) = xlDialogEditDelete: ListBox1.List(No, 2) = "xlDialogEditDelete": ListBox1.List(No, 3) = "shift_num": No = No + 1
ListBox1.AddItem 58: ListBox1.List(No, 1) = xlDialogEditionOptions: ListBox1.List(No, 2) = "xlDialogEditionOptions": ListBox1.List(No, 3) = "edition_type, edition_name, reference, option, appearance, size, formats": No = No + 1
ListBox1.AddItem 59: ListBox1.List(No, 1) = xlDialogEditSeries: ListBox1.List(No, 2) = "xlDialogEditSeries": ListBox1.List(No, 3) = "series_num, name_ref, x_ref, y_ref, z_ref, plot_order": No = No + 1
ListBox1.AddItem 60: ListBox1.List(No, 1) = xlDialogErrorbarX: ListBox1.List(No, 2) = "xlDialogErrorbarX": ListBox1.List(No, 3) = "include, type, amount, minus": No = No + 1
ListBox1.AddItem 61: ListBox1.List(No, 1) = xlDialogErrorbarY: ListBox1.List(No, 2) = "xlDialogErrorbarY": ListBox1.List(No, 3) = "include, type, amount, minus": No = No + 1
ListBox1.AddItem 62: ListBox1.List(No, 1) = xlDialogExternalDataProperties: ListBox1.List(No, 2) = "xlDialogExternalDataProperties": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 63: ListBox1.List(No, 1) = xlDialogExtract: ListBox1.List(No, 2) = "xlDialogExtract": ListBox1.List(No, 3) = "unique": No = No + 1
ListBox1.AddItem 64: ListBox1.List(No, 1) = xlDialogFileDelete: ListBox1.List(No, 2) = "xlDialogFileDelete": ListBox1.List(No, 3) = "file_text": No = No + 1
ListBox1.AddItem 65: ListBox1.List(No, 1) = xlDialogFileSharing: ListBox1.List(No, 2) = "xlDialogFileSharing": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 66: ListBox1.List(No, 1) = xlDialogFillGroup: ListBox1.List(No, 2) = "xlDialogFillGroup": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 67: ListBox1.List(No, 1) = xlDialogFillWorkgroup: ListBox1.List(No, 2) = "xlDialogFillWorkgroup": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 68: ListBox1.List(No, 1) = xlDialogFilter: ListBox1.List(No, 2) = "xlDialogFilter": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 69: ListBox1.List(No, 1) = xlDialogFilterAdvanced: ListBox1.List(No, 2) = "xlDialogFilterAdvanced": ListBox1.List(No, 3) = "operation, list_ref, criteria_ref, copy_ref, unique": No = No + 1
ListBox1.AddItem 70: ListBox1.List(No, 1) = xlDialogFindFile: ListBox1.List(No, 2) = "xlDialogFindFile": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 71: ListBox1.List(No, 1) = xlDialogFont: ListBox1.List(No, 2) = "xlDialogFont": ListBox1.List(No, 3) = "name_text, size_num": No = No + 1
ListBox1.AddItem 72: ListBox1.List(No, 1) = xlDialogFontProperties: ListBox1.List(No, 2) = "xlDialogFontProperties": ListBox1.List(No, 3) = "font, font_style, size, strikethrough, superscript, subscript, outline, shadow, underline, color, normal, background, start_char, char_count": No = No + 1
ListBox1.AddItem 73: ListBox1.List(No, 1) = xlDialogFormatAuto: ListBox1.List(No, 2) = "xlDialogFormatAuto": ListBox1.List(No, 3) = "format_num, number, font, alignment, border, pattern, width": No = No + 1
ListBox1.AddItem 74: ListBox1.List(No, 1) = xlDialogFormatChart: ListBox1.List(No, 2) = "xlDialogFormatChart": ListBox1.List(No, 3) = "layer_num, view, overlap, angle, gap_width, gap_depth, chart_depth, doughnut_size, axis_num, drop, hilo, up_down, series_line, labels, vary": No = No + 1
ListBox1.AddItem 75: ListBox1.List(No, 1) = xlDialogFormatCharttype: ListBox1.List(No, 2) = "xlDialogFormatCharttype": ListBox1.List(No, 3) = "apply_to, group_num, dimension, type_num": No = No + 1
ListBox1.AddItem 76: ListBox1.List(No, 1) = xlDialogFormatFont: ListBox1.List(No, 2) = "xlDialogFormatFont": ListBox1.List(No, 3) = "color, backgd, apply, name_text, size_num, bold, italic, underline, strike, outline, shadow, object_id, start_num, char_num": No = No + 1
ListBox1.AddItem 77: ListBox1.List(No, 1) = xlDialogFormatFont: ListBox1.List(No, 2) = "xlDialogFormatFont": ListBox1.List(No, 3) = "name_text, size_num, bold, italic, underline, strike, color, outline, shadow": No = No + 1
ListBox1.AddItem 78: ListBox1.List(No, 1) = xlDialogFormatFont: ListBox1.List(No, 2) = "xlDialogFormatFont": ListBox1.List(No, 3) = "name_text, size_num, bold, italic, underline, strike, color, outline, shadow, object_id_text, start_num, char_num": No = No + 1
ListBox1.AddItem 79: ListBox1.List(No, 1) = xlDialogFormatLegend: ListBox1.List(No, 2) = "xlDialogFormatLegend": ListBox1.List(No, 3) = "position_num": No = No + 1
ListBox1.AddItem 80: ListBox1.List(No, 1) = xlDialogFormatMain: ListBox1.List(No, 2) = "xlDialogFormatMain": ListBox1.List(No, 3) = "type_num, view, overlap, gap_width, vary, drop, hilo, angle, gap_depth, chart_depth, up_down, series_line, labels, doughnut_size": No = No + 1
ListBox1.AddItem 81: ListBox1.List(No, 1) = xlDialogFormatMove: ListBox1.List(No, 2) = "xlDialogFormatMove": ListBox1.List(No, 3) = "x_offset, y_offset, reference": No = No + 1
ListBox1.AddItem 82: ListBox1.List(No, 1) = xlDialogFormatMove: ListBox1.List(No, 2) = "xlDialogFormatMove": ListBox1.List(No, 3) = "x_pos, y_pos": No = No + 1
ListBox1.AddItem 83: ListBox1.List(No, 1) = xlDialogFormatMove: ListBox1.List(No, 2) = "xlDialogFormatMove": ListBox1.List(No, 3) = "explosion_num": No = No + 1
ListBox1.AddItem 84: ListBox1.List(No, 1) = xlDialogFormatNumber: ListBox1.List(No, 2) = "xlDialogFormatNumber": ListBox1.List(No, 3) = "format_text": No = No + 1
ListBox1.AddItem 85: ListBox1.List(No, 1) = xlDialogFormatOverlay: ListBox1.List(No, 2) = "xlDialogFormatOverlay": ListBox1.List(No, 3) = "type_num, view, overlap, gap_width, vary, drop, hilo, angle, series_dist, series_num, up_down, series_line, labels, doughnut_size": No = No + 1
ListBox1.AddItem 86: ListBox1.List(No, 1) = xlDialogFormatSize: ListBox1.List(No, 2) = "xlDialogFormatSize": ListBox1.List(No, 3) = "width, height": No = No + 1
ListBox1.AddItem 87: ListBox1.List(No, 1) = xlDialogFormatSize: ListBox1.List(No, 2) = "xlDialogFormatSize": ListBox1.List(No, 3) = "x_off, y_off, reference": No = No + 1
ListBox1.AddItem 88: ListBox1.List(No, 1) = xlDialogFormatText: ListBox1.List(No, 2) = "xlDialogFormatText": ListBox1.List(No, 3) = "x_align, y_align, orient_num, auto_text, auto_size, show_key, show_value, add_indent": No = No + 1
ListBox1.AddItem 89: ListBox1.List(No, 1) = xlDialogFormulaFind: ListBox1.List(No, 2) = "xlDialogFormulaFind": ListBox1.List(No, 3) = "text, in_num, at_num, by_num, dir_num, match_case, match_byte": No = No + 1
ListBox1.AddItem 90: ListBox1.List(No, 1) = xlDialogFormulaGoto: ListBox1.List(No, 2) = "xlDialogFormulaGoto": ListBox1.List(No, 3) = "reference, corner": No = No + 1
ListBox1.AddItem 91: ListBox1.List(No, 1) = xlDialogFormulaReplace: ListBox1.List(No, 2) = "xlDialogFormulaReplace": ListBox1.List(No, 3) = "find_text, replace_text, look_at, look_by, active_cell, match_case, match_byte": No = No + 1
ListBox1.AddItem 92: ListBox1.List(No, 1) = xlDialogFunctionWizard: ListBox1.List(No, 2) = "xlDialogFunctionWizard": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 93: ListBox1.List(No, 1) = xlDialogGallery3dArea: ListBox1.List(No, 2) = "xlDialogGallery3dArea": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 94: ListBox1.List(No, 1) = xlDialogGallery3dBar: ListBox1.List(No, 2) = "xlDialogGallery3dBar": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 95: ListBox1.List(No, 1) = xlDialogGallery3dColumn: ListBox1.List(No, 2) = "xlDialogGallery3dColumn": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 96: ListBox1.List(No, 1) = xlDialogGallery3dLine: ListBox1.List(No, 2) = "xlDialogGallery3dLine": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 97: ListBox1.List(No, 1) = xlDialogGallery3dPie: ListBox1.List(No, 2) = "xlDialogGallery3dPie": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 98: ListBox1.List(No, 1) = xlDialogGallery3dSurface: ListBox1.List(No, 2) = "xlDialogGallery3dSurface": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 99: ListBox1.List(No, 1) = xlDialogGalleryArea: ListBox1.List(No, 2) = "xlDialogGalleryArea": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 100: ListBox1.List(No, 1) = xlDialogGalleryBar: ListBox1.List(No, 2) = "xlDialogGalleryBar": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 101: ListBox1.List(No, 1) = xlDialogGalleryColumn: ListBox1.List(No, 2) = "xlDialogGalleryColumn": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 102: ListBox1.List(No, 1) = xlDialogGalleryCustom: ListBox1.List(No, 2) = "xlDialogGalleryCustom": ListBox1.List(No, 3) = "name_text": No = No + 1
ListBox1.AddItem 103: ListBox1.List(No, 1) = xlDialogGalleryDoughnut: ListBox1.List(No, 2) = "xlDialogGalleryDoughnut": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 104: ListBox1.List(No, 1) = xlDialogGalleryLine: ListBox1.List(No, 2) = "xlDialogGalleryLine": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 105: ListBox1.List(No, 1) = xlDialogGalleryPie: ListBox1.List(No, 2) = "xlDialogGalleryPie": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 106: ListBox1.List(No, 1) = xlDialogGalleryRadar: ListBox1.List(No, 2) = "xlDialogGalleryRadar": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 107: ListBox1.List(No, 1) = xlDialogGalleryScatter: ListBox1.List(No, 2) = "xlDialogGalleryScatter": ListBox1.List(No, 3) = "type_num, delete_overlay": No = No + 1
ListBox1.AddItem 108: ListBox1.List(No, 1) = xlDialogGoalSeek: ListBox1.List(No, 2) = "xlDialogGoalSeek": ListBox1.List(No, 3) = "target_cell, target_value, variable_cell": No = No + 1
ListBox1.AddItem 109: ListBox1.List(No, 1) = xlDialogGridlines: ListBox1.List(No, 2) = "xlDialogGridlines": ListBox1.List(No, 3) = "x_major, x_minor, y_major, y_minor, z_major, z_minor, 2D_effect": No = No + 1
ListBox1.AddItem 110: ListBox1.List(No, 1) = xlDialogImportTextFile: ListBox1.List(No, 2) = "xlDialogImportTextFile": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 111: ListBox1.List(No, 1) = xlDialogInsert: ListBox1.List(No, 2) = "xlDialogInsert": ListBox1.List(No, 3) = "shift_num": No = No + 1
ListBox1.AddItem 112: ListBox1.List(No, 1) = xlDialogInsertHyperlink: ListBox1.List(No, 2) = "xlDialogInsertHyperlink": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 113: ListBox1.List(No, 1) = xlDialogInsertNameLabel: ListBox1.List(No, 2) = "xlDialogInsertNameLabel": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 114: ListBox1.List(No, 1) = xlDialogInsertObject: ListBox1.List(No, 2) = "xlDialogInsertObject": ListBox1.List(No, 3) = "object_class, file_name, link_logical, display_icon_logical, icon_file, icon_number, icon_label": No = No + 1
ListBox1.AddItem 115: ListBox1.List(No, 1) = xlDialogInsertPicture: ListBox1.List(No, 2) = "xlDialogInsertPicture": ListBox1.List(No, 3) = "file_name, filter_number": No = No + 1
ListBox1.AddItem 116: ListBox1.List(No, 1) = xlDialogInsertTitle: ListBox1.List(No, 2) = "xlDialogInsertTitle": ListBox1.List(No, 3) = "chart, y_primary, x_primary, y_secondary, x_secondary": No = No + 1
ListBox1.AddItem 117: ListBox1.List(No, 1) = xlDialogLabelProperties: ListBox1.List(No, 2) = "xlDialogLabelProperties": ListBox1.List(No, 3) = "accel_text, accel2_text, 3d_shading": No = No + 1
ListBox1.AddItem 118: ListBox1.List(No, 1) = xlDialogListboxProperties: ListBox1.List(No, 2) = "xlDialogListboxProperties": ListBox1.List(No, 3) = "range, link, drop_size, multi_select, 3d_shading": No = No + 1
ListBox1.AddItem 119: ListBox1.List(No, 1) = xlDialogMacroOptions: ListBox1.List(No, 2) = "xlDialogMacroOptions": ListBox1.List(No, 3) = "macro_name, description, menu_on, menu_text, shortcut_on, shortcut_key, function_category, status_bar_text, help_id, help_file": No = No + 1
ListBox1.AddItem 120: ListBox1.List(No, 1) = xlDialogMailEditMailer: ListBox1.List(No, 2) = "xlDialogMailEditMailer": ListBox1.List(No, 3) = "to_recipients, cc_recipients, bcc_recipients, subject, enclosures, which_address": No = No + 1
ListBox1.AddItem 121: ListBox1.List(No, 1) = xlDialogMailLogon: ListBox1.List(No, 2) = "xlDialogMailLogon": ListBox1.List(No, 3) = "name_text, password_text, download_logical": No = No + 1
ListBox1.AddItem 122: ListBox1.List(No, 1) = xlDialogMailNextLetter: ListBox1.List(No, 2) = "xlDialogMailNextLetter": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 123: ListBox1.List(No, 1) = xlDialogMainChart: ListBox1.List(No, 2) = "xlDialogMainChart": ListBox1.List(No, 3) = "type_num, stack, 100, vary, overlap, drop, hilo, overlap%, cluster, angle": No = No + 1
ListBox1.AddItem 124: ListBox1.List(No, 1) = xlDialogMainChartType: ListBox1.List(No, 2) = "xlDialogMainChartType": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 125: ListBox1.List(No, 1) = xlDialogMenuEditor: ListBox1.List(No, 2) = "xlDialogMenuEditor": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 126: ListBox1.List(No, 1) = xlDialogMove: ListBox1.List(No, 2) = "xlDialogMove": ListBox1.List(No, 3) = "x_pos, y_pos, window_text": No = No + 1
ListBox1.AddItem 127: ListBox1.List(No, 1) = xlDialogNew: ListBox1.List(No, 2) = "xlDialogNew": ListBox1.List(No, 3) = "type_num, xy_series, add_logical": No = No + 1
ListBox1.AddItem 128: ListBox1.List(No, 1) = xlDialogNewWebQuery: ListBox1.List(No, 2) = "xlDialogNewWebQuery": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 129: ListBox1.List(No, 1) = xlDialogNote: ListBox1.List(No, 2) = "xlDialogNote": ListBox1.List(No, 3) = "add_text, cell_ref, start_char, num_chars": No = No + 1
ListBox1.AddItem 130: ListBox1.List(No, 1) = xlDialogObjectProperties: ListBox1.List(No, 2) = "xlDialogObjectProperties": ListBox1.List(No, 3) = "placement_type, print_object": No = No + 1
ListBox1.AddItem 131: ListBox1.List(No, 1) = xlDialogObjectProtection: ListBox1.List(No, 2) = "xlDialogObjectProtection": ListBox1.List(No, 3) = "locked, lock_text": No = No + 1
ListBox1.AddItem 132: ListBox1.List(No, 1) = xlDialogOpen: ListBox1.List(No, 2) = "xlDialogOpen": ListBox1.List(No, 3) = "file_text, update_links, read_only, format, prot_pwd, write_res_pwd, ignore_rorec, file_origin, custom_delimit, add_logical, editable, file_access, notify_logical, converter": No = No + 1
ListBox1.AddItem 133: ListBox1.List(No, 1) = xlDialogOpenLinks: ListBox1.List(No, 2) = "xlDialogOpenLinks": ListBox1.List(No, 3) = "document_text1, document_text2, ..., read_only, type_of_link": No = No + 1
ListBox1.AddItem 134: ListBox1.List(No, 1) = xlDialogOpenMail: ListBox1.List(No, 2) = "xlDialogOpenMail": ListBox1.List(No, 3) = "subject, comments": No = No + 1
ListBox1.AddItem 135: ListBox1.List(No, 1) = xlDialogOpenText: ListBox1.List(No, 2) = "xlDialogOpenText": ListBox1.List(No, 3) = "file_name, file_origin, start_row, file_type, text_qualifier, consecutive_delim, tab, semicolon, comma, space, other, other_char, field_info": No = No + 1
ListBox1.AddItem 136: ListBox1.List(No, 1) = xlDialogOptionsCalculation: ListBox1.List(No, 2) = "xlDialogOptionsCalculation": ListBox1.List(No, 3) = "type_num, iter, max_num, max_change, update, precision, date_1904, calc_save, save_values": No = No + 1
ListBox1.AddItem 137: ListBox1.List(No, 1) = xlDialogOptionsChart: ListBox1.List(No, 2) = "xlDialogOptionsChart": ListBox1.List(No, 3) = "display_blanks, plot_visible, size_with_window": No = No + 1
ListBox1.AddItem 138: ListBox1.List(No, 1) = xlDialogOptionsEdit: ListBox1.List(No, 2) = "xlDialogOptionsEdit": ListBox1.List(No, 3) = "incell_edit, drag_drop, alert, entermove, fixed, decimals, copy_objects, update_links, move_direction, autocomplete, animations": No = No + 1
ListBox1.AddItem 139: ListBox1.List(No, 1) = xlDialogOptionsGeneral: ListBox1.List(No, 2) = "xlDialogOptionsGeneral": ListBox1.List(No, 3) = "R1C1_mode, dde_on, sum_info, tips, recent_files, old_menus, user_info, font_name, font_size, default_location, alternate_location, sheet_num, enable_under": No = No + 1
ListBox1.AddItem 140: ListBox1.List(No, 1) = xlDialogOptionsListsAdd: ListBox1.List(No, 2) = "xlDialogOptionsListsAdd": ListBox1.List(No, 3) = "string_array": No = No + 1
ListBox1.AddItem 141: ListBox1.List(No, 1) = xlDialogOptionsListsAdd: ListBox1.List(No, 2) = "xlDialogOptionsListsAdd": ListBox1.List(No, 3) = "import_ref, by_row": No = No + 1
ListBox1.AddItem 142: ListBox1.List(No, 1) = xlDialogOptionsME: ListBox1.List(No, 2) = "xlDialogOptionsME": ListBox1.List(No, 3) = "def_rtl_sheet, crsr_mvmt, show_ctrl_char, gui_lang": No = No + 1
ListBox1.AddItem 143: ListBox1.List(No, 1) = xlDialogOptionsTransition: ListBox1.List(No, 2) = "xlDialogOptionsTransition": ListBox1.List(No, 3) = "menu_key, menu_key_action, nav_keys, trans_eval, trans_entry": No = No + 1
ListBox1.AddItem 144: ListBox1.List(No, 1) = xlDialogOptionsView: ListBox1.List(No, 2) = "xlDialogOptionsView": ListBox1.List(No, 3) = "formula, status, notes, show_info, object_num, page_breaks, formulas, gridlines, color_num, headers, outline, zeros, hor_scroll, vert_scroll, sheet_tabs": No = No + 1
ListBox1.AddItem 145: ListBox1.List(No, 1) = xlDialogOutline: ListBox1.List(No, 2) = "xlDialogOutline": ListBox1.List(No, 3) = "auto_styles, row_dir, col_dir, create_apply": No = No + 1
ListBox1.AddItem 146: ListBox1.List(No, 1) = xlDialogOverlay: ListBox1.List(No, 2) = "xlDialogOverlay": ListBox1.List(No, 3) = "type_num, stack, 100, vary, overlap, drop, hilo, overlap%, cluster, angle, series_num, auto": No = No + 1
ListBox1.AddItem 147: ListBox1.List(No, 1) = xlDialogOverlayChartType: ListBox1.List(No, 2) = "xlDialogOverlayChartType": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 148: ListBox1.List(No, 1) = xlDialogPageSetup: ListBox1.List(No, 2) = "xlDialogPageSetup": ListBox1.List(No, 3) = "head, foot, left, right, top, bot, hdng, grid, h_cntr, v_cntr, orient, paper_size, scale, pg_num, pg_order, bw_cells, quality, head_margin, foot_margin, notes, draft": No = No + 1
ListBox1.AddItem 149: ListBox1.List(No, 1) = xlDialogPageSetup: ListBox1.List(No, 2) = "xlDialogPageSetup": ListBox1.List(No, 3) = "head, foot, left, right, top, bot, size, h_cntr, v_cntr, orient, paper_size, scale, pg_num, bw_chart, quality, head_margin, foot_margin, draft": No = No + 1
ListBox1.AddItem 150: ListBox1.List(No, 1) = xlDialogPageSetup: ListBox1.List(No, 2) = "xlDialogPageSetup": ListBox1.List(No, 3) = "head, foot, left, right, top, bot, orient, paper_size, scale, quality, head_margin, foot_margin, pg_num": No = No + 1
ListBox1.AddItem 151: ListBox1.List(No, 1) = xlDialogParse: ListBox1.List(No, 2) = "xlDialogParse": ListBox1.List(No, 3) = "parse_text, destination_ref": No = No + 1
ListBox1.AddItem 152: ListBox1.List(No, 1) = xlDialogPasteNames: ListBox1.List(No, 2) = "xlDialogPasteNames": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 153: ListBox1.List(No, 1) = xlDialogPasteSpecial: ListBox1.List(No, 2) = "xlDialogPasteSpecial": ListBox1.List(No, 3) = "paste_num, operation_num, skip_blanks, transpose": No = No + 1
ListBox1.AddItem 154: ListBox1.List(No, 1) = xlDialogPasteSpecial: ListBox1.List(No, 2) = "xlDialogPasteSpecial": ListBox1.List(No, 3) = "rowcol, titles, categories, replace, series": No = No + 1
ListBox1.AddItem 155: ListBox1.List(No, 1) = xlDialogPasteSpecial: ListBox1.List(No, 2) = "xlDialogPasteSpecial": ListBox1.List(No, 3) = "paste_num": No = No + 1
ListBox1.AddItem 156: ListBox1.List(No, 1) = xlDialogPasteSpecial: ListBox1.List(No, 2) = "xlDialogPasteSpecial": ListBox1.List(No, 3) = "format_text, pastelink_logical, display_icon_logical, icon_file, icon_number, icon_label": No = No + 1
ListBox1.AddItem 157: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "apattern, afore, aback, newui": No = No + 1
ListBox1.AddItem 158: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "lauto, lstyle, lcolor, lwt, hwidth, hlength, htype": No = No + 1
ListBox1.AddItem 159: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "bauto, bstyle, bcolor, bwt, shadow, aauto, apattern, afore, aback, rounded, newui": No = No + 1
ListBox1.AddItem 160: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "bauto, bstyle, bcolor, bwt, shadow, aauto, apattern, afore, aback, invert, apply, newfill": No = No + 1
ListBox1.AddItem 161: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "lauto, lstyle, lcolor, lwt, tmajor, tminor, tlabel": No = No + 1
ListBox1.AddItem 162: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "lauto, lstyle, lcolor, lwt, apply, smooth": No = No + 1
ListBox1.AddItem 163: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "lauto, lstyle, lcolor, lwt, mauto, mstyle, mfore, mback, apply, smooth": No = No + 1
ListBox1.AddItem 164: ListBox1.List(No, 1) = xlDialogPatterns: ListBox1.List(No, 2) = "xlDialogPatterns": ListBox1.List(No, 3) = "type, picture_units, apply": No = No + 1
ListBox1.AddItem 165: ListBox1.List(No, 1) = xlDialogPhonetic: ListBox1.List(No, 2) = "xlDialogPhonetic": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 166: ListBox1.List(No, 1) = xlDialogPivotCalculatedField: ListBox1.List(No, 2) = "xlDialogPivotCalculatedField": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 167: ListBox1.List(No, 1) = xlDialogPivotCalculatedItem: ListBox1.List(No, 2) = "xlDialogPivotCalculatedItem": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 168: ListBox1.List(No, 1) = xlDialogPivotClientServerSet: ListBox1.List(No, 2) = "xlDialogPivotClientServerSet": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 169: ListBox1.List(No, 1) = xlDialogPivotFieldGroup: ListBox1.List(No, 2) = "xlDialogPivotFieldGroup": ListBox1.List(No, 3) = "start, end, by, periods": No = No + 1
ListBox1.AddItem 170: ListBox1.List(No, 1) = xlDialogPivotFieldProperties: ListBox1.List(No, 2) = "xlDialogPivotFieldProperties": ListBox1.List(No, 3) = "name, pivot_field_name, new_name, orientation, function, formats": No = No + 1
ListBox1.AddItem 171: ListBox1.List(No, 1) = xlDialogPivotFieldUngroup: ListBox1.List(No, 2) = "xlDialogPivotFieldUngroup": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 172: ListBox1.List(No, 1) = xlDialogPivotShowPages: ListBox1.List(No, 2) = "xlDialogPivotShowPages": ListBox1.List(No, 3) = "name, page_field": No = No + 1
ListBox1.AddItem 173: ListBox1.List(No, 1) = xlDialogPivotSolveOrder: ListBox1.List(No, 2) = "xlDialogPivotSolveOrder": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 174: ListBox1.List(No, 1) = xlDialogPivotTableOptions: ListBox1.List(No, 2) = "xlDialogPivotTableOptions": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 175: ListBox1.List(No, 1) = xlDialogPivotTableWizard: ListBox1.List(No, 2) = "xlDialogPivotTableWizard": ListBox1.List(No, 3) = "type, source, destination, name, row_grand, col_grand, save_data, apply_auto_format, auto_page, reserved": No = No + 1
ListBox1.AddItem 176: ListBox1.List(No, 1) = xlDialogPlacement: ListBox1.List(No, 2) = "xlDialogPlacement": ListBox1.List(No, 3) = "placement_type": No = No + 1
ListBox1.AddItem 177: ListBox1.List(No, 1) = xlDialogPrint: ListBox1.List(No, 2) = "xlDialogPrint": ListBox1.List(No, 3) = "range_num, from, to, copies, draft, preview, print_what, color, feed, quality, y_resolution, selection, printer_text, print_to_file, collate": No = No + 1
ListBox1.AddItem 178: ListBox1.List(No, 1) = xlDialogPrinterSetup: ListBox1.List(No, 2) = "xlDialogPrinterSetup": ListBox1.List(No, 3) = "printer_text": No = No + 1
ListBox1.AddItem 179: ListBox1.List(No, 1) = xlDialogPrintPreview: ListBox1.List(No, 2) = "xlDialogPrintPreview": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 180: ListBox1.List(No, 1) = xlDialogPromote: ListBox1.List(No, 2) = "xlDialogPromote": ListBox1.List(No, 3) = "rowcol": No = No + 1
ListBox1.AddItem 181: ListBox1.List(No, 1) = xlDialogProperties: ListBox1.List(No, 2) = "xlDialogProperties": ListBox1.List(No, 3) = "title, subject, author, keywords, comments": No = No + 1
ListBox1.AddItem 182: ListBox1.List(No, 1) = xlDialogProtectDocument: ListBox1.List(No, 2) = "xlDialogProtectDocument": ListBox1.List(No, 3) = "contents, windows, password, objects, scenarios": No = No + 1
ListBox1.AddItem 183: ListBox1.List(No, 1) = xlDialogProtectSharing: ListBox1.List(No, 2) = "xlDialogProtectSharing": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 184: ListBox1.List(No, 1) = xlDialogPublishAsWebPage: ListBox1.List(No, 2) = "xlDialogPublishAsWebPage": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 185: ListBox1.List(No, 1) = xlDialogPushbuttonProperties: ListBox1.List(No, 2) = "xlDialogPushbuttonProperties": ListBox1.List(No, 3) = "default_logical, cancel_logical, dismiss_logical, help_logical, accel_text, accel_text2": No = No + 1
ListBox1.AddItem 186: ListBox1.List(No, 1) = xlDialogReplaceFont: ListBox1.List(No, 2) = "xlDialogReplaceFont": ListBox1.List(No, 3) = "font_num, name_text, size_num, bold, italic, underline, strike, color, outline, shadow": No = No + 1
ListBox1.AddItem 187: ListBox1.List(No, 1) = xlDialogRoutingSlip: ListBox1.List(No, 2) = "xlDialogRoutingSlip": ListBox1.List(No, 3) = "recipients, subject, message, route_num, return_logical, status_logical": No = No + 1
ListBox1.AddItem 188: ListBox1.List(No, 1) = xlDialogRowHeight: ListBox1.List(No, 2) = "xlDialogRowHeight": ListBox1.List(No, 3) = "height_num, reference, standard_height, type_num": No = No + 1
ListBox1.AddItem 189: ListBox1.List(No, 1) = xlDialogRun: ListBox1.List(No, 2) = "xlDialogRun": ListBox1.List(No, 3) = "reference, step": No = No + 1
ListBox1.AddItem 190: ListBox1.List(No, 1) = xlDialogSaveAs: ListBox1.List(No, 2) = "xlDialogSaveAs": ListBox1.List(No, 3) = "document_text, type_num, prot_pwd, backup, write_res_pwd, read_only_rec": No = No + 1
ListBox1.AddItem 191: ListBox1.List(No, 1) = xlDialogSaveCopyAs: ListBox1.List(No, 2) = "xlDialogSaveCopyAs": ListBox1.List(No, 3) = "document_text": No = No + 1
ListBox1.AddItem 192: ListBox1.List(No, 1) = xlDialogSaveNewObject: ListBox1.List(No, 2) = "xlDialogSaveNewObject": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 193: ListBox1.List(No, 1) = xlDialogSaveWorkbook: ListBox1.List(No, 2) = "xlDialogSaveWorkbook": ListBox1.List(No, 3) = "document_text, type_num, prot_pwd, backup, write_res_pwd, read_only_rec": No = No + 1
ListBox1.AddItem 194: ListBox1.List(No, 1) = xlDialogSaveWorkspace: ListBox1.List(No, 2) = "xlDialogSaveWorkspace": ListBox1.List(No, 3) = "name_text": No = No + 1
ListBox1.AddItem 195: ListBox1.List(No, 1) = xlDialogScale: ListBox1.List(No, 2) = "xlDialogScale": ListBox1.List(No, 3) = "cross, cat_labels, cat_marks, between, max, reverse": No = No + 1
ListBox1.AddItem 196: ListBox1.List(No, 1) = xlDialogScale: ListBox1.List(No, 2) = "xlDialogScale": ListBox1.List(No, 3) = "min_num, max_num, major, minor, cross, logarithmic, reverse, max": No = No + 1
ListBox1.AddItem 197: ListBox1.List(No, 1) = xlDialogScale: ListBox1.List(No, 2) = "xlDialogScale": ListBox1.List(No, 3) = "cat_labels, cat_marks, reverse, between": No = No + 1
ListBox1.AddItem 198: ListBox1.List(No, 1) = xlDialogScale: ListBox1.List(No, 2) = "xlDialogScale": ListBox1.List(No, 3) = "series_labels, series_marks, reverse": No = No + 1
ListBox1.AddItem 199: ListBox1.List(No, 1) = xlDialogScale: ListBox1.List(No, 2) = "xlDialogScale": ListBox1.List(No, 3) = "min_num, max_num, major, minor, cross, logarithmic, reverse, min": No = No + 1
ListBox1.AddItem 200: ListBox1.List(No, 1) = xlDialogScenarioAdd: ListBox1.List(No, 2) = "xlDialogScenarioAdd": ListBox1.List(No, 3) = "scen_name, value_array, changing_ref, scen_comment, locked, hidden": No = No + 1
ListBox1.AddItem 201: ListBox1.List(No, 1) = xlDialogScenarioCells: ListBox1.List(No, 2) = "xlDialogScenarioCells": ListBox1.List(No, 3) = "changing_ref": No = No + 1
ListBox1.AddItem 202: ListBox1.List(No, 1) = xlDialogScenarioEdit: ListBox1.List(No, 2) = "xlDialogScenarioEdit": ListBox1.List(No, 3) = "scen_name, new_scenname, value_array, changing_ref, scen_comment, locked, hidden": No = No + 1
ListBox1.AddItem 203: ListBox1.List(No, 1) = xlDialogScenarioMerge: ListBox1.List(No, 2) = "xlDialogScenarioMerge": ListBox1.List(No, 3) = "source_file": No = No + 1
ListBox1.AddItem 204: ListBox1.List(No, 1) = xlDialogScenarioSummary: ListBox1.List(No, 2) = "xlDialogScenarioSummary": ListBox1.List(No, 3) = "result_ref, report_type": No = No + 1
ListBox1.AddItem 205: ListBox1.List(No, 1) = xlDialogScrollbarProperties: ListBox1.List(No, 2) = "xlDialogScrollbarProperties": ListBox1.List(No, 3) = "value, min, max, inc, page, link, 3d_shading": No = No + 1
ListBox1.AddItem 206: ListBox1.List(No, 1) = xlDialogSelectSpecial: ListBox1.List(No, 2) = "xlDialogSelectSpecial": ListBox1.List(No, 3) = "type_num, value_type, levels": No = No + 1
ListBox1.AddItem 207: ListBox1.List(No, 1) = xlDialogSendMail: ListBox1.List(No, 2) = "xlDialogSendMail": ListBox1.List(No, 3) = "recipients, subject, return_receipt": No = No + 1
ListBox1.AddItem 208: ListBox1.List(No, 1) = xlDialogSeriesAxes: ListBox1.List(No, 2) = "xlDialogSeriesAxes": ListBox1.List(No, 3) = "axis_num": No = No + 1
ListBox1.AddItem 209: ListBox1.List(No, 1) = xlDialogSeriesOptions: ListBox1.List(No, 2) = "xlDialogSeriesOptions": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 210: ListBox1.List(No, 1) = xlDialogSeriesOrder: ListBox1.List(No, 2) = "xlDialogSeriesOrder": ListBox1.List(No, 3) = "chart_num, old_series_num, new_series_num": No = No + 1
ListBox1.AddItem 211: ListBox1.List(No, 1) = xlDialogSeriesShape: ListBox1.List(No, 2) = "xlDialogSeriesShape": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 212: ListBox1.List(No, 1) = xlDialogSeriesX: ListBox1.List(No, 2) = "xlDialogSeriesX": ListBox1.List(No, 3) = "x_ref": No = No + 1
ListBox1.AddItem 213: ListBox1.List(No, 1) = xlDialogSeriesY: ListBox1.List(No, 2) = "xlDialogSeriesY": ListBox1.List(No, 3) = "name_ref, y_ref": No = No + 1
ListBox1.AddItem 214: ListBox1.List(No, 1) = xlDialogSetBackgroundPicture: ListBox1.List(No, 2) = "xlDialogSetBackgroundPicture": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 215: ListBox1.List(No, 1) = xlDialogSetPrintTitles: ListBox1.List(No, 2) = "xlDialogSetPrintTitles": ListBox1.List(No, 3) = "titles_for_cols_ref, titles_for_rows_ref": No = No + 1
ListBox1.AddItem 216: ListBox1.List(No, 1) = xlDialogSetUpdateStatus: ListBox1.List(No, 2) = "xlDialogSetUpdateStatus": ListBox1.List(No, 3) = "link_text, status, type_of_link": No = No + 1
ListBox1.AddItem 217: ListBox1.List(No, 1) = xlDialogShowDetail: ListBox1.List(No, 2) = "xlDialogShowDetail": ListBox1.List(No, 3) = "rowcol, rowcol_num, expand, show_field": No = No + 1
ListBox1.AddItem 218: ListBox1.List(No, 1) = xlDialogShowToolbar: ListBox1.List(No, 2) = "xlDialogShowToolbar": ListBox1.List(No, 3) = "bar_id, visible, dock, x_pos, y_pos, width, protect, tool_tips, large_buttons, color_buttons": No = No + 1
ListBox1.AddItem 219: ListBox1.List(No, 1) = xlDialogSize: ListBox1.List(No, 2) = "xlDialogSize": ListBox1.List(No, 3) = "width, height, window_text": No = No + 1
ListBox1.AddItem 220: ListBox1.List(No, 1) = xlDialogSort: ListBox1.List(No, 2) = "xlDialogSort": ListBox1.List(No, 3) = "orientation, key1, order1, key2, order2, key3, order3, header, custom, case": No = No + 1
ListBox1.AddItem 221: ListBox1.List(No, 1) = xlDialogSort: ListBox1.List(No, 2) = "xlDialogSort": ListBox1.List(No, 3) = "orientation, key1, order1, type, custom": No = No + 1
ListBox1.AddItem 222: ListBox1.List(No, 1) = xlDialogSortSpecial: ListBox1.List(No, 2) = "xlDialogSortSpecial": ListBox1.List(No, 3) = "sort_by, method, key1, order1, key2, order2, key3, order3, header, order, case": No = No + 1
ListBox1.AddItem 223: ListBox1.List(No, 1) = xlDialogSplit: ListBox1.List(No, 2) = "xlDialogSplit": ListBox1.List(No, 3) = "col_split, row_split": No = No + 1
ListBox1.AddItem 224: ListBox1.List(No, 1) = xlDialogStandardFont: ListBox1.List(No, 2) = "xlDialogStandardFont": ListBox1.List(No, 3) = "name_text, size_num, bold, italic, underline, strike, color, outline, shadow": No = No + 1
ListBox1.AddItem 225: ListBox1.List(No, 1) = xlDialogStandardWidth: ListBox1.List(No, 2) = "xlDialogStandardWidth": ListBox1.List(No, 3) = "standard_num": No = No + 1
ListBox1.AddItem 226: ListBox1.List(No, 1) = xlDialogStyle: ListBox1.List(No, 2) = "xlDialogStyle": ListBox1.List(No, 3) = "bold, italic": No = No + 1
ListBox1.AddItem 227: ListBox1.List(No, 1) = xlDialogSubscribeTo: ListBox1.List(No, 2) = "xlDialogSubscribeTo": ListBox1.List(No, 3) = "file_text, format_num": No = No + 1
ListBox1.AddItem 228: ListBox1.List(No, 1) = xlDialogSubtotalCreate: ListBox1.List(No, 2) = "xlDialogSubtotalCreate": ListBox1.List(No, 3) = "at_change_in, function_num, total, replace, pagebreaks, summary_below": No = No + 1
ListBox1.AddItem 229: ListBox1.List(No, 1) = xlDialogSummaryInfo: ListBox1.List(No, 2) = "xlDialogSummaryInfo": ListBox1.List(No, 3) = "title, subject, author, keywords, comments": No = No + 1
ListBox1.AddItem 230: ListBox1.List(No, 1) = xlDialogTable: ListBox1.List(No, 2) = "xlDialogTable": ListBox1.List(No, 3) = "row_ref, column_ref": No = No + 1
ListBox1.AddItem 231: ListBox1.List(No, 1) = xlDialogTabOrder: ListBox1.List(No, 2) = "xlDialogTabOrder": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 232: ListBox1.List(No, 1) = xlDialogTextToColumns: ListBox1.List(No, 2) = "xlDialogTextToColumns": ListBox1.List(No, 3) = "destination_ref, data_type, text_delim, consecutive_delim, tab, semicolon, comma, space, other, other_char, field_info": No = No + 1
ListBox1.AddItem 233: ListBox1.List(No, 1) = xlDialogUnhide: ListBox1.List(No, 2) = "xlDialogUnhide": ListBox1.List(No, 3) = "window_text": No = No + 1
ListBox1.AddItem 234: ListBox1.List(No, 1) = xlDialogUpdateLink: ListBox1.List(No, 2) = "xlDialogUpdateLink": ListBox1.List(No, 3) = "link_text, type_of_link": No = No + 1
ListBox1.AddItem 235: ListBox1.List(No, 1) = xlDialogVbaInsertFile: ListBox1.List(No, 2) = "xlDialogVbaInsertFile": ListBox1.List(No, 3) = "filename_text": No = No + 1
ListBox1.AddItem 236: ListBox1.List(No, 1) = xlDialogVbaMakeAddin: ListBox1.List(No, 2) = "xlDialogVbaMakeAddIn": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 237: ListBox1.List(No, 1) = xlDialogVbaProcedureDefinition: ListBox1.List(No, 2) = "xlDialogVbaProcedureDefinition": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 238: ListBox1.List(No, 1) = xlDialogView3d: ListBox1.List(No, 2) = "xlDialogView3d": ListBox1.List(No, 3) = "elevation, perspective, rotation, axes, height%, autoscale": No = No + 1
ListBox1.AddItem 239: ListBox1.List(No, 1) = xlDialogWebOptionsEncoding: ListBox1.List(No, 2) = "xlDialogWebOptionsEncoding": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 240: ListBox1.List(No, 1) = xlDialogWebOptionsFiles: ListBox1.List(No, 2) = "xlDialogWebOptionsFiles": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 241: ListBox1.List(No, 1) = xlDialogWebOptionsFonts: ListBox1.List(No, 2) = "xlDialogWebOptionsFonts": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 242: ListBox1.List(No, 1) = xlDialogWebOptionsGeneral: ListBox1.List(No, 2) = "xlDialogWebOptionsGeneral": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 243: ListBox1.List(No, 1) = xlDialogWebOptionsPictures: ListBox1.List(No, 2) = "xlDialogWebOptionsPictures": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 244: ListBox1.List(No, 1) = xlDialogWindowMove: ListBox1.List(No, 2) = "xlDialogWindowMove": ListBox1.List(No, 3) = "x_pos, y_pos, window_text": No = No + 1
ListBox1.AddItem 245: ListBox1.List(No, 1) = xlDialogWindowSize: ListBox1.List(No, 2) = "xlDialogWindowSize": ListBox1.List(No, 3) = "width, height, window_text": No = No + 1
ListBox1.AddItem 246: ListBox1.List(No, 1) = xlDialogWorkbookAdd: ListBox1.List(No, 2) = "xlDialogWorkbookAdd": ListBox1.List(No, 3) = "name_array, dest_book, position_num": No = No + 1
ListBox1.AddItem 247: ListBox1.List(No, 1) = xlDialogWorkbookCopy: ListBox1.List(No, 2) = "xlDialogWorkbookCopy": ListBox1.List(No, 3) = "name_array, dest_book, position_num": No = No + 1
ListBox1.AddItem 248: ListBox1.List(No, 1) = xlDialogWorkbookInsert: ListBox1.List(No, 2) = "xlDialogWorkbookInsert": ListBox1.List(No, 3) = "type_num": No = No + 1
ListBox1.AddItem 249: ListBox1.List(No, 1) = xlDialogWorkbookMove: ListBox1.List(No, 2) = "xlDialogWorkbookMove": ListBox1.List(No, 3) = "name_array, dest_book, position_num": No = No + 1
ListBox1.AddItem 250: ListBox1.List(No, 1) = xlDialogWorkbookName: ListBox1.List(No, 2) = "xlDialogWorkbookName": ListBox1.List(No, 3) = "oldname_text, newname_text": No = No + 1
ListBox1.AddItem 251: ListBox1.List(No, 1) = xlDialogWorkbookNew: ListBox1.List(No, 2) = "xlDialogWorkbookNew": ListBox1.List(No, 3) = " ": No = No + 1
ListBox1.AddItem 252: ListBox1.List(No, 1) = xlDialogWorkbookOptions: ListBox1.List(No, 2) = "xlDialogWorkbookOptions": ListBox1.List(No, 3) = "sheet_name, bound_logical, new_name": No = No + 1
ListBox1.AddItem 253: ListBox1.List(No, 1) = xlDialogWorkbookProtect: ListBox1.List(No, 2) = "xlDialogWorkbookProtect": ListBox1.List(No, 3) = "structure, windows, password": No = No + 1
ListBox1.AddItem 254: ListBox1.List(No, 1) = xlDialogWorkbookTabSplit: ListBox1.List(No, 2) = "xlDialogWorkbookTabSplit": ListBox1.List(No, 3) = "ratio_num": No = No + 1
ListBox1.AddItem 255: ListBox1.List(No, 1) = xlDialogWorkbookUnhide: ListBox1.List(No, 2) = "xlDialogWorkbookUnhide": ListBox1.List(No, 3) = "sheet_text": No = No + 1
ListBox1.AddItem 256: ListBox1.List(No, 1) = xlDialogWorkgroup: ListBox1.List(No, 2) = "xlDialogWorkgroup": ListBox1.List(No, 3) = "name_array": No = No + 1
ListBox1.AddItem 257: ListBox1.List(No, 1) = xlDialogWorkspace: ListBox1.List(No, 2) = "xlDialogWorkspace": ListBox1.List(No, 3) = "fixed, decimals, r1c1, scroll, status, formula, menu_key, remote, entermove, underlines, tools, notes, nav_keys, menu_key_action, drag_drop, show_info": No = No + 1
ListBox1.AddItem 258: ListBox1.List(No, 1) = xlDialogZoom: ListBox1.List(No, 2) = "xlDialogZoom": ListBox1.List(No, 3) = "magnification": No = No + 1
End Sub

Hiç yorum yok:

Blog Arşivi

Bu gadget'ta bir hata oluştu

Bu Blogda Ara

Contributor

Contributor
Mustafa ULUSARAÇ İstanbul, TÜRKİYE
free counters
T. C. Central Bank Indicative Exchange Rates
Currency Exchange Rate Widget,Currency Converter Widget
Borsa İstanbul