首页 › 『悬赏求助区』 › wps中如何把第二列中内容和第一列重复的几个字删除？

xjsqd2004 发表于 2024-2-28 10:51

wps中如何把第二列中内容和第一列重复的几个字删除？

A列                     B列                           结果
有高老头            有高老头捡垃圾      捡垃圾
一个漂亮小孩   小孩坐飞机               坐飞机（把第二列中在第一列有的文字去掉）

cbwh 发表于 2024-2-28 16:53

第一个是可以的，用 =SUBSTITUTE(B1,A1,"")
第二个不完全重复，等待高手

alstar 发表于 2024-3-9 21:56

本帖最后由 alstar 于 2024-3-9 22:10 编辑

----

alstar 发表于 2024-3-9 22:05

本帖最后由 alstar 于 2024-3-9 22:09 编辑


Sub 去重复()

    lastRowA = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    lastRowB = ws.Cells(ws.Rows.Count, "B").End(xlUp).Row
    For Each aCell In ws.Range("A1:A" & lastRowA)
      For Each bCell In ws.Range("B1:B" & lastRowB)
            If aCell.Value = bCell.Value Then
                bCell.Value = "重复"
                Exit For
            End If
      Next bCell
    Next aCell
End Sub

查看完整版本: wps中如何把第二列中内容和第一列重复的几个字删除？