Note: The other languages of the website are Google-translated. Back to English

如果大于Excel中的某个数字,如何使单元格加粗?

假设您有一个数字范围,并且如果单元格值大于某个特定数字(例如90),那么您想以粗体显示一些单元格,该怎么办? 本文将详细介绍实现它的三种方法。

如果使用条件格式,如果单元格大于一定数量,则使单元格加粗
如果单元格大于VBA代码,则使单元格加粗
使用Kutools for Excel使单元格大于或等于一定数量时加粗


如果使用条件格式,如果单元格大于一定数量,则使单元格加粗

如果单元格的值大于Excel中的某个特定数字,则可以应用条件格式设置功能使单元格加粗。 请执行以下操作。

1.选择要加粗大于特定数字的数字的单元格范围,然后单击 条件格式 > 新规则公司首页 标签。 看截图:

2。 在里面 新格式规则 对话框,您需要:

2.1)选择 仅格式化包含以下内容的单元格 在选项 选择规则类型 框。
2.2)选择 比...更棒 从第二 仅格式化带有 下拉列表,然后在下一个文本框中输入您要使单元格加粗的特定数字(此处输入数字90)。
2.3)点击 格式 按钮。 看截图:

3。 在里面 单元格格式 对话框,单击 胆大 字体样式 箱下 字体 选项卡,然后单击 OK 按钮。

4.返回时 新格式规则 对话框中,单击 OK 按钮。

然后,所有大于90的单元格将立即在选定范围内以粗体格式设置。


如果单元格大于VBA代码,则使单元格加粗

除上述方法外,如果大于Excel中的特定数量,则可以应用VBA代码使单元格加粗。

1。 按 其他 + F11 同时打开 Microsoft Visual Basic应用程序 窗口。

2。 在里面 Microsoft Visual Basic应用程序 窗口中,单击 插页 > 模块。 然后将下面的VBA代码复制并粘贴到“模块”窗口中。

VBA代码:如果大于一定数量,则使单元格变为粗体

Sub BoldHighHours()
	Dim xRg As Range
	Dim xCell As Range
	Dim xAddress As String
	Dim xUpdate As Boolean
	On Error Resume Next
	xAddress                    = Application.ActiveWindow.RangeSelection.Address
	Set xRg                     = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg                     = Application.Intersect(xRg, ActiveSheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		xUpdate                    = Application.ScreenUpdating
		Application.ScreenUpdating = False
		For Each xCell In xRg
			If VBA.IsNumeric(xCell.Value) Then _
			xCell.Font.Bold = (xCell.Value > 90)
		Next
		Application.ScreenUpdating = xUpdate
	End Sub

备注:在代码中,数字90是您需要使单元格加粗的值。 请根据自己的需要进行更改。

3。 按 F5 在中运行代码的关键 Kutools for Excel 对话框,选择您需要用粗体字体设置单元格格式的范围,然后单击 OK 按钮。

然后,大于90的单元格将以粗体格式设置。


使用Kutools for Excel使单元格大于或等于一定数量时加粗

新的 选择特定的单元格 Kutools for Excel实用程序将帮助您轻松地一次选择在指定范围内大于一定数量的单元格,然后您可以手动使用粗体字体设置它们的格式。

申请前 Kutools for Excel首先下载并安装.

1.选择范围,然后单击 库工具 > 选择 > 选择特定的单元格。 看截图:

2。 在里面 选择特定的单元格 对话框中选择 细胞 在选项 选择类型 部分,并在 特定类型 部分,选择 比...更棒 在下拉列表中,在文本框中输入特定的数字,最后单击 OK 按钮。

3.然后弹出一个对话框,告诉您选择了多少个单元格,单击 OK 按钮。 现在,仅选择大于90的单元格,继续选择这些单元格,然后单击 胆大 按钮下 公司首页 标签以使其大胆。

  如果您想免费试用(30-day) 这个实用程序, 请点击下载,然后按照上述步骤进行操作。


最佳办公效率工具

Kutools for Excel解决了您的大多数问题,并使您的生产率提高了80%

  • 重用: 快速插入 复杂的公式,图表 以及您以前使用过的任何东西; 加密单元 带密码 创建邮件列表 并发送电子邮件...
  • 超级公式栏 (轻松编辑多行文本和公式); 阅读版式 (轻松读取和编辑大量单元格); 粘贴到过滤范围...
  • 合并单元格/行/列 不会丢失数据; 拆分单元格内容; 合并重复的行/列...防止细胞重复; 比较范围...
  • 选择重复或唯一 行; 选择空白行 (所有单元格都是空的); 超级查找和模糊查找 在许多工作簿中; 随机选择...
  • 确切的副本 多个单元格,无需更改公式参考; 自动创建参考 到多张纸; 插入项目符号,复选框等...
  • 提取文字,添加文本,按位置删除, 删除空间; 创建和打印分页小计; 在单元格内容和注释之间转换...
  • 超级滤镜 (将过滤方案保存并应用于其他工作表); 高级排序 按月/周/日,频率及更多; 特殊过滤器 用粗体,斜体...
  • 结合工作簿和工作表; 根据关键列合并表; 将数据分割成多个工作表; 批量转换xls,xlsx和PDF...
  • 超过300种强大功能. 支持 Office / Excel 2007-2021 和 365。支持所有语言。 在您的企业或组织中轻松部署。 完整功能 30 天免费试用。 60 天退款保证。
kte选项卡201905

Office选项卡为Office带来了选项卡式界面,使您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
officetab底部
按评论排序
注释 (0)
还没有评分。 成为第一位评论!
这里还没有评论
留下你的意见
以访客身份发帖
×
评价此帖子:
0   产品特性
建议地点

关注我们

版权所有 © 2009 - extendoffice.com。 | 版权所有。 供电 ExtendOffice。 | 网站地图
Microsoft和Office徽标是Microsoft Corporation在美国和/或其他国家的商标或注册商标。
受Sectigo SSL保护