电子表格批量处理：两列逐行比较，如果b列中含有与a列中相同的字符则删除此字符。
答案:2 悬赏:40 手机版
解决时间 2021-01-04 19:03
- 提问者网友：浩歌待明月
- 2021-01-04 08:07
电子表格批量处理：两列逐行比较，如果b列中含有与a列中相同的字符则删除此字符。
最佳答案
- 五星知识达人网友：痴妹与他
- 2021-01-04 08:34
使用VBA来实现，按Alt+F11，新建模块，右侧窗口粘贴如下代码：
Sub 核对()
Dim x As Integer: Dim T, A As String
On Error Resume Next
For x = 1 To 10000
If Cells(x, 2) <> "" Then T = Cells(x, 2): A = Application.WorksheetFunction.VLookup(T, Range("A:A"), 1, False)
If A = T Then Cells(x, 2) = ""
Next x
End Sub
Sub 核对()
Dim x As Integer: Dim T, A As String
On Error Resume Next
For x = 1 To 10000
If Cells(x, 2) <> "" Then T = Cells(x, 2): A = Application.WorksheetFunction.VLookup(T, Range("A:A"), 1, False)
If A = T Then Cells(x, 2) = ""
Next x
End Sub
全部回答
- 1楼网友：woshuo
- 2021-01-04 09:07
你好！
在C1输入：
=COUNTIF(A1:A13,B1)>0
在筛选，TRUE的，即为重复值．再删除
如果对你有帮助，望采纳。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯