在excel中，将指定文字（如：设计）批量加粗显示并变成红色字体？

1、打开excel

　　2、点击视图选项卡，点击宏

　　3、输入加粗，点击创建按钮

　　4、在弹出窗口中输入如下代码：

Sub 加粗变红()
Dim j, i As Integer
For j = 1 To ActiveSheet.UsedRange.Count
Cells.Find(What:="设计", After:=ActiveCell).Activate
i = WorksheetFunction.Find("设计", ActiveCell)
With ActiveCell.Characters(Start:=i, Length:=2).Font
.Name = "宋体"
.FontStyle = "常规"
.FontStyle = "加粗"
.Color = -16776961
End With
Next
End Sub

//代码结束

　　其中

　　1)With ActiveSheet表示当前活动表格

　　2)For Each c In Range("A1:A12")中"A1:A12"表示加粗文字的范围

　　3) i = InStr(1, cv, "加粗", 1) 中"加粗"为需要加粗的文字

　　4)Characters(i, 2).Font.Bold = True中“(i, 2).”表示加粗文字的字符数

　　5)With c.......End With 可重复多次，分别加粗不同的文字

　　编辑完成后关闭窗口

　　5、点击宏按钮，选择加粗，点击执行按钮

　　6、可以看到需要加醋的文字已经被加粗

在excel中，将指定文字（如：设计）批量加粗显示并变成红色字体？相关推荐

VBA查找单元格内指定文字并标红加粗
VBA查找单元格内指定文字并标红加粗功能: 选中想要查找的单元格,在函数内点击运行,实现将指定的文字标红加粗的功能 bug: 指定文字会区分大小写,如何让它不区分大小写? 改进将是否加粗,和标记的 ...
html中的关键词批量加粗,excel表格怎么批量加粗中指定的关键字?
在工作中有事会需要将excel表格中所有指定的关键字都进行加粗,又不能进行直接的替换,那么怎么办呢? 软件名称:MicroExcel(微表格) 3.1.1.2 中文免费安装版软件大小:5.16MB更新 ...
C#/VB.NET 复制Excel中的指定单元格区域
本文介绍C#及VB.NET程序代码来复制Excel中的指定单元格区域,包括复制单元格文本及单元格样式.复制时,可在工作簿中的同一个sheet工作表内复制,也可在不同工作簿的不同sheet工作表间复制. ...
在Textview中获取指定文字位置（兼顾网址链接和emoji表情），并在其附近展示图片
本文主要讲在Textview中获取指定文字的位置,最后,附带一点文字宽高的测量. 下面,我会给出全部源码.自己建个demo,复制进去就能跑起来. 先强调一下,不建议在ListView中使用.最好是在一 ...
怎么在Excel中查找指定文本并标记颜色
今天跟大家分享一下怎么在Excel中查找指定文本并标记颜色 1.如下图,我们想要在表格中快速查找标记"李虹霖" 2.首选我们全选表格区域 3.然后点击下图选项(Excel工具箱,百 ...
使用itext7在PDF文件中的指定文字位置添加电子签名图片技术记录
使用itext7在PDF文件中的指定文字位置添加电子签名图片文章目录使用itext7在PDF文件中的指定文字位置添加电子签名图片一.技术使用背景二.使用步骤 1.引入依赖 2.具体代码 2.控 ...
POI替换word中的指定文字（包含表格，表格中有回车）
网上可以找到很多POI替换Word中指定文字的代码,然而基本上都没有对文档中的表格中包含的段落(回车)进行处理.自己写了,代码记录如下: /** * *@templetStream 文档的输入流 *@ ...
Python删除Excel中的指定工作簿Sheet
Python删除Excel中的指定工作簿Sheet 简单粗暴上代码默认文件路径为同一个文件夹 # 导入所需库 import openpyxl 若没有此库直接 Terminal 安装 pip ins ...
word怎么把页面顺序倒过来_在excel中怎么使文字颠倒顺序反过来显示呢?
有时我们会看到大神们将文字逆序显示,他们是怎么做的呢?难道是一个一个字打上去或者是复制的么?下面小编就教你在Excel中如何快速将文字颠倒.好了话不多说开始介绍了.这是完成图可以看看. 软件名称:Of ...

在excel中，将指定文字（如：设计）批量加粗显示并变成红色字体？

在excel中，将指定文字（如：设计）批量加粗显示并变成红色字体？相关推荐

最新文章

热门文章