根据字符位置为单元格中的字符设置不同的字体颜色

Question

我正在尝试为范围内所有单元格的内容的前3个，后3个和后3个字符设置三种不同的颜色。下面的代码将整个单元格内容更改为绿色，而不仅仅是前3个字符。

请指导我如何做到这一点。我是VB的新手。

Sub LoopAndChangeColor()

  Dim i As Integer
  Dim targetRange As Range
  'Set targetRange = Range("A1:A10")

  'For Each cell In targetRange
  For i = 1 To 10
    Cells(i, 1).Characters(1, 3).Font.Color = vbGreen
    Cells(i, 1).Characters(4, 3).Font.Color = vbBlue
    Cells(i, 1).Characters(7, 3).Font.Color = vbRed
  Next

End Sub

Answer 1

此信息可能为时已晚，但您可以随时使用所需的宏。访问：http://excelfindandformat.herobo.com以及相关的34个youtube视频。