显示A列指定范围的数字字符串中,B列缺少的数字

micch

1. =0&SUM(100^(ROW($1:$6)-1)*LARGE((1-FREQUENCY(--MID(B5,ROW($1:$5)*2-1,2),ROW($1:$10)))*ROW($1:$11),ROW($1:$6)))

复制代码

今天看一天frequency白看了，数字不用match

micch

1. =TJOIN("",TEXT(IF(FREQUENCY(--MID(B5,ROW($1:$5)*2-1,2),ROW($1:$10)),"",ROW($1:$11)),0&0))

复制代码

来个自定义函数，替代textjoin

WYS67

micch 发表于 2019-3-23 21:41
今天看一天frequency白看了，数字不用match

老师：下面是别人写的与本帖问题类似的自定义函数，但是只能处理单字节【0~9】，无法处理双字节【01~99】的，您能不能在代码里增加一个参数，当第三参数指定为2时，执行双字节【01~99】计算；省略参数时，默认指定为1，执行原先的单字节【0~9】计算？

字符串相减.zip (13.93 KB, 下载次数: 1)

2019-3-23 22:02 上传

点击文件名下载附件

WYS67

micch 发表于 2019-3-23 21:49
来个自定义函数，替代textjoin

老师：和365的TEXTJOIN函数同样语法吗？

micch

WYS67 发表于 2019-3-23 22:04
老师：和365的TEXTJOIN函数同样语法吗？

少一个参数，textjoin第二个参数控制忽略空值，我就去掉了，何苦呢空值还合并的干啥。

第一个参数间隔符号，第二个参数，可以是一个，也可以还有第三参数，第四参数等等

就是把第二个参数起所有的参数内容，用第一参数链接起来，默认是空值不合并。你可以把text那一段写在textjoin函数里就得到结果了。

WYS67

micch 发表于 2019-3-23 22:09
少一个参数，textjoin第二个参数控制忽略空值，我就去掉了，何苦呢空值还合并的干啥。

第一个参数间隔 ...

连接字符串我原先用的是自定义函数CONTXT，现在365的内置函数里增加了TEXTJOIN和CONCAT函数。

micch

WYS67 发表于 2019-3-23 22:02
老师：下面是别人写的与本帖问题类似的自定义函数，但是只能处理单字节【0~9】，无法处理双字节【01~99】 ...

1. Function QC(st1, st2, Optional n% = 1) As String
   
2.     Set d = CreateObject("scripting.dictionary")
   
3.     For i = 1 To Len(st1) - n + 1 Step n
   
4.         d(Mid(st1, i, n)) = Mid(st1, i, n)
   
5.     Next
   
6.     For i = 1 To Len(st2) - n + 1 Step n
   
7.         d(Mid(st2, i, n)) = ""
   
8.     Next
   
9.     QC = Join(d.items, "")
   
10. End Function
    

复制代码

第三参数是几，就按几个字符为一节进行比对

WYS67

micch 发表于 2019-3-24 09:41
第三参数是几，就按几个字符为一节进行比对

老师：您写的自定义函数QC完全实现了我心中所想！显示的计算结果很正确！！！

弱弱问一句：当数据量很大时，普通公式QC(A5,B5,2)和区域数组公式{  =QC(A5:A10000,B5:B10000,2)，哪个运算速度更快些？

WYS67

micch 发表于 2019-3-24 09:41
第三参数是几，就按几个字符为一节进行比对

在C5里输入 =ZFCXJS(A5,B5,2)，即可显示计算结果，比起函数公式，简洁明快多了！老师帅帅的，棒棒哒！

micch

WYS67 发表于 2019-3-24 11:09
老师：您写的自定义函数QC完全实现了我心中所想！显示的计算结果很正确！！！

弱弱问一句：当数据量很 ...

不懂，代码我就是写出来都不知道对错，更别说速度的问题了。我就是练习