vba中当单元格a1的颜色为红色，单元格b1的值为5怎么写？

2024-11-28 08:40:17

推荐回答（3个）

回答1：

if [A1].interior.color=vbred then [b1]=5

回答2：

你可以使用录制宏的方法，很方便，先点录制宏，然后做你问题上的操作，停止录制，然后查看宏的VBA代码，很多时候录制宏很方便，妈妈再也不担心我的学习了。

回答3：

If Range("A1").Interior.ColorIndex = 3 Then Range("B1") = 5
如果是A列，如A1：A10
Sub aa()
For x = 1 To 10
If Cells(x, 1).Interior.ColorIndex = 3 Then Cells(x, 2) = 5
Next x
End Sub