Excel使用技巧:如何将大于或小于某一数值替换成一个具体的数字?

问题描述

依然是工作中遇到的一个问题。

在一个Excel工作表中,如何将如何将大于或小于某一数值的数替换成一个特定的数字?

比如如何将下面的表中所有大于等于9的数字替换成1,小于9的数字替换成0?

处理步骤

1.在工作表标签上右键,点击“查看代码”

2.先将小于9的变成0,在VBA编辑窗口中粘贴下面的代码

 Sub FindReplace()
 Dim Rng As Range
 Dim WorkRng As Range
 On Error Resume Next
 xTitleId = "KutoolsforExcel"
 Set WorkRng = Application.Selection
 Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
 For Each Rng In WorkRng
 If Rng.Value > 9 Then
 Rng.Value = 0
 End If
 Next
 End Sub

3.点击运行(下面是mac版Excel配图,win样式不一样)

4.选择数据范围

5.点击确定,将看到表中小于9的数据全部变成了0

6.重复上面步骤,将代码中< 9改成> 8,将Rng.Value = 0改成Rng.Value = 1,操作一遍会发现实现了想要的需求。

-> 加入科技玩家交流群组:点击加入 注意:
1.文中二维码和链接可能带有邀请性质,请各位玩家自行抉择。
2.请勿通过链接填写qq号与密码、银行卡号与密码等个人隐私信息。
3.禁止纯拉人头,拉app注册等信息,发现必小黑屋。
4.同一种信息仅发一次,多发会被删除。
5.文章中源码或APP等,无法保证其绝对安全,需自行辨别。
6.文章关联方不想展示也可以微信站长“socutesheep”删除。

给TA买糖
共{{data.count}}人
人已买糖
Office学习笔记工具

Excel使用技巧:如何将多个工作表合成一个?

2018-7-14 10:45:00

工具

Image paste:编辑器增强插件,截图直接粘贴

2018-7-16 10:19:00

27 条回复 A文章作者 M管理员
贴心提醒
请认真对待作者付出,勿发表无意义言论,触发过滤规则的评论将无法提交,包含敏感词的评论会自动变成待审核状态哦。
  1. 汤圆

    66666666666666666666666六

  2. 橙子

    谢谢,学习了

  3. 安夔

    谢谢分享

  4. atmo

    Excel使用技巧:

  5. 听书人

    感谢大佬的教程

  6. slimei

    先看看,不明白的地方再问

  7. cxx

    发表无意义言论,

个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
搜索