excel 如果在用户表单上选中复选框，然后在数据库工作表上着色，代码是什么？

1l5u6lss 于 2022-12-01 发布在其他

关注(0)|答案(1)|浏览(72)

所以我创建了一个用户表单，它有一个复选框。如果我选中了“厚度”部分，那么在数据库表上的“厚度”列也是红色的。代码是什么？因为如果我使用这个代码，它在我的excel中不起作用

If CBThickness.Value = True Then
Sheets("Database Adjustment").Range("I").Interior.Color = vbRed
End If

1条答案

.Range("I")会掷回错误。.Range("I:I")会参照栏I中的所有储存格，如同Columns("I")一样。

Sheets("Database Adjustment").Range("I:I").Interior.Color = vbRed

或者

Sheets("Database Adjustment").Columns("I").Interior.Color = vbRed