【问题标题】:Excel userform checkboxes nullExcel 用户表单复选框为空
【发布时间】:2015-02-20 18:04:42
【问题描述】:

我创建了一个用户表单并添加了一个名为“DSSSContact”的检查框。我已经编写了一些代码来检查用户表单的内容,然后保存在以下子中:

Private Sub SaveandClose_Click()

当表单被初始化时,复选框被设置为灰色但被勾选——我认为这意味着该值为空。 SavandClose 子代码包括以下内容,我认为可以确保复选框设置为 true 或 false:

If DSSSContact = Null Then
MsgBox "DSSS Contact Test"
Exit Sub
End If

但是,当我使用保存和关闭命令按钮保存和关闭表单而没有在复选框上进行选择时,表单会保存内容而不触发消息框。我为验证文本框和组合框是否已填充而创建的所有其他检查工作正常。我还在同一个 sub 中添加了以下代码:

Debug.Print Me.DSSSContact.Value

这会在即时窗口中打印 null

非常感谢任何帮助。谢谢

【问题讨论】:

    标签: excel checkbox userform


    【解决方案1】:

    表单中的复选框为 True = 已选中或 False = 未选中。

    sub test()
        MsgBox DSSSContact.Value
        If DSSSContact.Value = "False" Then
        MsgBox "DSSS Contact Test"
        Exit Sub
        End If
    
    end sub
    

    【讨论】:

      【解决方案2】:

      试试

      If IsNull(DSSSContact.Value) Then
      

      【讨论】:

        猜你喜欢
        • 2017-08-16
        • 1970-01-01
        • 1970-01-01
        • 2013-10-23
        • 1970-01-01
        • 2016-07-02
        • 1970-01-01
        • 1970-01-01
        • 2017-12-17
        相关资源
        最近更新 更多