Excel中如何用vba实现 把所有单元格中后四个字符设置为红色字体_百度知 ...
发布网友
发布时间：2024-03-31 16:39
共2个回答
热心网友
时间：2024-06-24 01:52
Excel中用VBA实现把单元格中后四个字符修改颜色，其实就是一个Font的Color参数的修改。
代码如下:
Sub FontColor()
For i = 3 To 14
SStr = Len(Range("J" & i)) - 3
Range("J" & i).Characters(Start:=SStr, Length:=4).Font.Color = -16776961
Next i
End Sub
代码原图:
这里用了一个For循环语句，主要是循环单元格用的，这里循环的是3到14，range里表示的是J列，链接变量，从J3单元格一直循环设置到J14单元格。
效果如图:
热心网友
时间：2024-06-24 01:57
