excel实现C列=A列-B列的文字提取

需求描述

在A列里有如：“xxa、xxb、xxc、yyd、yyee”的内容，而B列有如：“xx、xx、xx、yy、yy”的内容，希望在C列将A列的“a、b、c、d、ee”提取出来。

image.png

需求分析

使用公式比较麻烦，使用VB较为简单

VB代码

Public Function th(ran1 As Range, ran2 As Range)
ranText = ran1
For i = 1 To Len(ran2)
    ranText = Application.WorksheetFunction.Substitute(ranText, Mid(ran2, i, 1), "")
Next i
th = ranText
End Function

用法

用法：打开Excel按下Alt+F11打开VBA编辑窗口，然后选择：插入“模块”，将以上代码复制到新插入的模块中并关闭VBA编辑窗口。用的时候直接在C1中输入=th(a1,b1)即可