EXCEL中如何在这段VBA代码中添加字体加粗的命令（excel vba设置批注字体大小）

这段改一下If i0 > 0 Then c.Characters(i0, Len(n)).Font.Color = vbRed: i = i0 + Len(n)

改成

If i0 > 0 Then

c.Characters(i0, Len(n)).Font.Color = vbRed: i = i0 + Len(n)

c.Characters(i0, Len(n)).Font.bold=true

end if