UC知道Excel 的vba的报错
来源：百度知道 编辑：UC知道 时间：2024/05/30 06:18:15
Private Sub CheckBox1_Click()
If CheckBox1.Caption = "bad" Then
'这样写报错
CheckBox1.Select
With Selection
.Caption = "good"
End With
Else
CheckBox1.Caption = "bad" '这样可以
End If
End Sub
为啥报错？？？
If CheckBox1.Caption = "bad" Then
'这样写报错
CheckBox1.Select
With Selection
.Caption = "good"
End With
Else
CheckBox1.Caption = "bad" '这样可以
End If
End Sub
为啥报错？？？
CheckBox1.Caption 是不是 CheckBox1.value啊？
If CheckBox1.Caption = "bad" Then
'这样写报错
'CheckBox1.s Select
With CheckBox1
.Caption = "good"
End With
Else
CheckBox1.Caption = "bad" '这样可以
End If
Private Sub CheckBox1_Click()
If CheckBox1.Caption = "bad" Then
CheckBox1.Select
CheckBox1.Caption = "good"
Else
CheckBox1.Caption = "bad"
End If
End Sub
以上是正确代码。
因为selection不支持控件，只支持Sheet,Range,Rows,Columns这些Excel元素。