美文网首页
给Excel单元格中的部分文字标红

给Excel单元格中的部分文字标红

作者: Queenie的学习笔记 | 来源:发表于2021-10-20 10:27 被阅读0次
  1. 按ALT+F11打开VB编辑器;
ALT+F11
  1. 按F7弹出代码窗口;


    F7
  2. 复制以下代码,粘贴到sheet1并保存:
Sub AAA()
    Dim R As Range, L As Long, S As String
    Application.ScreenUpdating = False
    S = "预警"  '修改成你要标记的字符
    L = Len(S)
    For Each R In Selection
        If InStr(R, S) > 0 Then R.Characters(InStr(R, S), L).Font.Color = vbRed
    Next
    Application.ScreenUpdating = True
End Sub

保存
  1. 关闭VB代码编辑窗口,在表格中选取目标区域,按ALT+F8 选择对应的宏。


    ALT+F8

相关文章

网友评论

      本文标题:给Excel单元格中的部分文字标红

      本文链接:https://www.haomeiwen.com/subject/kvctaltx.html