室内设计培训
平面设计培训
部落窝教育
网站首页 >> Excel教程 >> 文章内容

判断单元格是否有数据有效性设置的方法

[日期:2012-02-05]   来源:IT部落窝  作者:IT部落窝   阅读:1127[字体: ]
内容提要:文章介绍excel中判断单元格是否有数据有效性设置的方法。

  一个excel工作表,如何判断哪些师傅设置了数据有效性。除了我们前面文章:《怎样取消和删除数据有效性的方法》中介绍的定位法以外,还可以使用VBA代码来判断是否有数据有效性设置。

第一,判断选取的单元格区域是否有数据有效性设置

  步骤一:选择需要进行判断的单元格区域,比如A1:A5

  步骤二:按ALT+F11组合键,打开VBE编辑器。

  步骤三:单击“插入”→“模块”,在新建模块中复制下面的代码:

Sub 数据有效性是否判断()
On Error GoTo 错误
If ActiveCell.Validation.Type > 0 Then MsgBox "选区存在数据有效性": Exit Sub
错误: MsgBox "选区没有数据有效性"
End Sub

  步骤四,按工具栏中的“运行”按钮。如果选择的单元格区域有数据有效性设置,那么弹出消息框:选区存在数据有效性。反之,消息框显示:选区没有数据有效性。

数据有效性 是否

第二,判断一个单元格是否有数据有效性设置

  参考上面介绍的方法,将代码改为:

Sub 数据有效性是否判断()
    On Error GoTo err
    VT = Range("A7").Validation.Type
    MsgBox "此单元格设置了数据有效性"
    Exit Sub
err:
    MsgBox "此单元格没有设置数据有效性"
End Sub

  代码解释:代码以A7单元格来举例的。其中用Validation.Type判断,如果 Validation.Type 发生错误,则没有设置,如果返回数字 1—7,则有设置数据有效性。

IT部落窝PS,CDR,213班 分享到: QQ空间 新浪微博 腾讯微博 人人网
photoshop教程
Photoshop教程
平面设计教程
Photoshop教程