有没有办法在键入单元格时插入格式化的字符?

时间:2018-06-15 17:20:43

标签: excel vba excel-vba

我需要能够在单元格中输入文本时插入彩色符号。我可以使用宏在Word中执行此操作但在Excel中我只能替换整个单元格。

或者有没有办法使用vba将字体样式应用于所选字符(而不是整个单元格)?

1 个答案:

答案 0 :(得分:0)

从简单使用宏录制器,你应该能够使用.characters()。font来添加字体/颜色等。到字符串的一部分:

ActiveCell.FormulaR1C1 = "Text here"
Range("A1").Select
With ActiveCell.Characters(Start:=9, Length:=1).Font
    .Name = "Verdana"
    .FontStyle = "Regular"
    .Size = 9
    .Strikethrough = False
    .Superscript = False
    .Subscript = False
    .OutlineFont = False
    .Shadow = False
    .Underline = xlUnderlineStyleNone
    .ThemeColor = xlThemeColorLight1
    .TintAndShade = 0
    .ThemeFont = xlThemeFontNone
End With