Question

当我尝试用

加粗文本字体时

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.

如何禁止警告并获取文本字体螺栓？

Answer 1

你正在写

.Font.Bolt = True

尝试 .Font.Bold = True

使文字字体粗体

1 个答案: