Text 将文本字体设置为粗体

当我试着用

ActiveSheet.Range("C2:G2").Select 
With Selection
   .Merge
   .Value = "Dealer Commission Rate"
   .HorizontalAlignment = xlCenter
   .VerticalAlignment = xlCenter
   .WrapText = True
   .Font.Name = "Arial"
   .Font.Size = 11
   .Font.Bolt = True
End With

在VB6中，我不断收到以下警告：

“所选内容包含多个数据值。正在合并到一个单元格中。” 将只保留最左上方的数据“

由于该行而导致的另一个问题。

Font.Bolt=True

error#:438 "Object doesn't support this property or method.

如何抑制警告并获取文本字体螺栓？

您正在编写

.Font.Bolt=True

试一试

---

.Font.Bold=True

也许

.Font.Bold

？有智能感知的时候，你怎么能写.Bolt呢？