VBA中的With

2025-01-01 02:52:24

推荐回答（3个）

回答1：

With Range("A1")
With .Font '此行代码中的Font必须加点，代表的是 Range("A1").Font否则系统认不出Font是什么，只能报错
.Bold = True
.Color = vbRed
End With
End With

回答2：

With Range("A1")
With .Font
.Bold = True
.Color = vbRed
End With
End With
因为Font是Range（“A”）的一个属性，具体可查看VBE中对象浏览器。

回答3：

With Range("A1").Font
.Bold = True
.Color = vbRed
End With
这样就OK了