EXCEL如何实现同一单元格内不同的颜色显示(公式)
发布网友
发布时间:2022-04-25 15:58
我来回答
共2个回答
热心网友
时间:2023-10-15 07:17
如果用公式,应该没办法部分显示其他颜色。如果是字体,双击单元格选择部分字体,然后选择设置对应颜色即可。
热心网友
时间:2023-10-15 07:18
Private Sub Worksheet_Change(ByVal Target As Range)
Dim m%, n%, i%
i = Target.Row
If Target.Column = 11 Then
On Error Resume Next
m = WorksheetFunction.Search(";", Range("K" & i))
If Err.Number Then
m = Len(Range("K" & i).Value) + 1
Range("K" & i).Characters(Start:=1, Length:=m - 1).Font.Color = -16776961
End If
n = WorksheetFunction.Search(";", Range("K" & i), m + 1)
If Err.Number Then n = Len(Range("K" & i).Value) + 1
On Error GoTo 0
Range("K" & i).Characters(Start:=1, Length:=m - 1).Font.Color = -16776961
Range("K" & i).Characters(Start:=m + 1, Length:=n - m - 1).Font.Color = -16776961
End If
End Sub