0
我有一个问题。如何根据单元格是否为空来启用/禁用按钮。如何根据空白单元格禁用按钮
在名为“Sheet1”的Excel表格中,我有一个名为“CommandButton1”的按钮,分配给一个名为“If_empty”的宏。
我需要做的是如果列“F2”是空的我想禁用按钮,但如果列“F2”有任何值的按钮被启用。
我该如何做到这一点?
帮助是极大的赞赏
我有一个问题。如何根据单元格是否为空来启用/禁用按钮。如何根据空白单元格禁用按钮
在名为“Sheet1”的Excel表格中,我有一个名为“CommandButton1”的按钮,分配给一个名为“If_empty”的宏。
我需要做的是如果列“F2”是空的我想禁用按钮,但如果列“F2”有任何值的按钮被启用。
我该如何做到这一点?
帮助是极大的赞赏
由于@Slai和Doug建议,使用下面的代码(将其添加到您的Worksheet_Change
事件)。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim WatchRange As Range
Dim IntersectRange As Range
Dim i, j As Integer
Set WatchRange = Range("F2")
Set IntersectRange = Intersect(Target, WatchRange)
If Not IntersectRange Is Nothing Then
If Target.Value = "" Then
CommandButton1.Enabled = False
Else
CommandButton1.Enabled = True
End If
End If
End Sub
你可以尝试添加一个小参考子,如果(细胞(2,6).value的=“”然后退出子否则Run_Normal_Macro 你可以添加类似的事情,你的现有代码的开始。它不会禁用按钮,但点击它将不会显然做任何事情。 –
我想'CommandButton1.Enabled = [F2]>“”' – Slai
Slai,这是一个好主意,我想按钮不在用户窗体中的工作表上 如果工作表中的activex控件可能在这样的工作表中设置事件控件 Private Sub CommandButton1_MouseDown(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Single,ByVal Y As Single) 如果单元格(2,6)。 VALU e =“”Then Exit Sub 致电宏 End Sub –