当前位置: 代码迷 >> VBA >> Excel单元格保护
  详细解决方案

Excel单元格保护

热度:1610   发布时间:2013-02-26 00:00:00.0
Excel单元格保护求助


这种提示框是怎样实现的?

------解决方案--------------------------------------------------------
Dialogs 对象 
Microsoft Excel 中所有 Dialog 对象的集合。
说明


每个 Dialog 对象代表一个内置对话框。不能在集合中新建或添加内置对话框。Dialog 对象只能在 Show 方法中用来显示相应的对话框。

Microsoft Excel Visual Basic 对象库包含许多内置对话框的内置常量。每个常量的前缀均为“xlDialog”,随后即为对话框的名称。例如,“应用名称”对话框常量为 xlDialogApplyNames,“查找文件”对话框常量为 xlDialogFindFile。这些常量是 XlBuiltinDialog 枚举类型的成员。


示例


使用 Dialogs 属性可返回 Dialogs 集合。下例显示可用的 Microsoft Excel 内置对话框的个数。

Visual Basic for Applications 
MsgBox Application.Dialogs.Count 

使用 Dialogs(index)(其中 index 是用于标识对话框的内置常量)可返回单个 Dialog 对象。下例运行内置的“打开文件”对话框。

Visual Basic for Applications 
dlgAnswer = Application.Dialogs(xlDialogOpen).Show 


内置对话框参数列表 

对话框常量 参数列表 
xlDialogActivate window_text, pane_num 
xlDialogActiveCellFont font, font_style, size, strikethrough, superscript, subscript, outline, shadow, underline, color, normal, background, start_char, char_count 
xlDialogAddChartAutoformat name_text, desc_text 
xlDialogAddinManager operation_num, addinname_text, copy_logical 
xlDialogAlignment horiz_align, wrap, vert_align, orientation, add_indent 
xlDialogApplyNames name_array, ignore, use_rowcol, omit_col, omit_row, order_num, append_last 
xlDialogApplyStyle style_text 
xlDialogAppMove x_num, y_num 
xlDialogAppSize x_num, y_num 
xlDialogArrangeAll arrange_num, active_doc, sync_horiz, sync_vert 
xlDialogAssignToObject macro_ref 
xlDialogAssignToTool bar_id, position, macro_ref 
xlDialogAttachText attach_to_num, series_num, point_num 
xlDialogAttachToolbars
xlDialogAutoCorrect correct_initial_caps, capitalize_days 
xlDialogAxes x_primary, y_primary, x_secondary, y_secondary 
xlDialogAxes x_primary, y_primary, z_primary 
xlDialogBorder outline, left, right, top, bottom, shade, outline_color, left_color, right_color, top_color, bottom_color 
xlDialogCalculation type_num, iter, max_num, max_change, update, precision, date_1904, calc_save, save_values, alt_exp, alt_form 
xlDialogCellProtection locked, hidden 
xlDialogChangeLink old_text, new_text, type_of_link 
xlDialogChartAddData ref, rowcol, titles, categories, replace, series 
xlDialogChartLocation
xlDialogChartOptionsDataLabels
xlDialogChartOptionsDataTable
xlDialogChartSourceData
xlDialogChartTrend type, ord_per, forecast, backcast, intercept, equation, r_squared, name 
xlDialogChartType
xlDialogChartWizard long, ref, gallery_num, type_num, plot_by, categories, ser_titles, legend, title, x_title, y_title, z_title, number_cats, number_titles 
xlDialogCheckboxProperties value, link, accel_text, accel2_text, 3d_shading 
xlDialogClear type_num 
xlDialogColorPalette file_text 
xlDialogColumnWidth width_num, reference, standard, type_num, standard_num 
xlDialogCombination type_num 
xlDialogConditionalFormatting
xlDialogConsolidate source_refs, function_num, top_row, left_col, create_links 
xlDialogCopyChart size_num 
xlDialogCopyPicture appearance_num, size_num, type_num 
xlDialogCreateNames top, left, bottom, right 
xlDialogCreatePublisher file_text, appearance, size, formats 
xlDialogCustomizeToolbar 类别 

  相关解决方案