单元格错误值.docxVIP

单元格错误值 可将单元格错误值插入单元格，或者用 CVErr 函数测试单元格的值是否为某个错误值。单元格错误值可为以下 XlCVError 常量之一。 常量 错误号 单元格错误值 xlErrDiv0 2007 #DIV/0! xlErrNA 2042 #N/A xlErrName 2029 #NAME? xlErrNull 2000 #NULL! xlErrNum 2036 #NUM! xlErrRef 2023 #REF! xlErrValue 2015 #VALUE! Excel VBA  教程：单元格错误值·示例 本示例将七个单元格错误值分别插入到工作表  Sheet1  的  A1:A7  单元格区域 中。 myArray = Array(xlErrDiv0, xlErrNA, xlErrName, xlErrNull, _ xlErrNum, xlErrRef, xlErrValue) For i = 1 To 7 Worksheets(Sheet1).Cells(i, 1).Value = CVErr(myArray(i - 1)) Next i 本示例检查工作表 Sheet1 的活动单元格是否包含单元格错误值， 如果有，则显示一则消息。本示例可作为针对单元格错误值的错误处理程序的模型结构。 Worksheets(Sheet1).Activate If IsError(ActiveCell.Value) Then errval = ActiveCell.Value Select Case errval Case CVErr(xlErrDiv0) MsgBox #DIV/0! error Case CVErr(xlErrNA) MsgBox #N/A error Case CVErr(xlErrName) MsgBox #NAME? error Case CVErr(xlErrNull) MsgBox #NULL! error Case CVErr(xlErrNum) MsgBox #NUM! error Case CVErr(xlErrRef) MsgBox #REF! error Case CVErr(xlErrValue) MsgBox #VALUE! error Case Else MsgBox This should never happen!! End Select End If 上页： Excel VBA教程：“帮助”主题不可用 下页： Excel VBA教程：内置对话 框参数列表 Excel VBA 教程：单元格错误值 Excel VBA 教程：内置对话框参数列表 Excel VBA 教程： Hidden 属性 Excel VBA教程：与语言相关的属性、方法和 Excel VBA教程：可用于 Visual Basic 的工 函数 作表函数列表 Excel VBA 教程：新的事件 Excel VBA教程：新的方法（按字母顺序列出） Excel VBA 教程：新的方法（按对象列出） Excel VBA 教程：新的对象 Excel VBA教程：新的属性（按字母顺序列出） Excel VBA 教程：新的属性（按对象排序） Excel VBA教程：为 Microsoft Excel 2002 开 Excel VBA 教程： OLE 程序标识符 发人员提供的新增功能 Excel VBA 教程： AcceptAllChanges 方法 Excel VBA 教程： Activate 方法 Excel VBA 教程： ActivateMicrosoftApp 方 Excel VBA 教程： ActivateNext 方法 法 Excel VBA 教程： ActivatePrevious 方法 Excel VBA 教程： Add 方法 Excel VBA 教程： AddCallout 方法 Excel VBA 教程： AddChartAutoFormat 方法 F - VBA教程 - Excel VBA 教程 - 单元格错误值