用自定义函数提取字符

先来看看一个表，也不知道哪个挨千刀的，在记录数据的时候搞成这个样子，都聚集在A1单元格。要将A1中的姓名和银行卡号分别提取出来，只需要一个自定义函数GetChar就可以轻松搞定。C2单元格：=INDEX(GetChar($A$1,3),ROW(1:1))D2单元格：=INDEX(GetChar($A$1,1),ROW(1:1))银行卡号可以搞定，身份证号也很容易，还是这个挨千刀的记录员，把姓名和身份证号都登记在了A1单元格，有没有一种想动刀子的冲动？再次请出自定义函数GetChar：C2单元格：=INDEX(GetChar($A$1,3),ROW(1:1))D2单元格：=LEFT(INDEX(GetChar($A$1,1),ROW(1:1))&"X",18)那么这个神秘的GetChar到底是什么呢？再和你赌5毛钱的，你现在的电脑里写完这个公式之后，你得到的结果是：#NAME?它是来源于我独创的VBA自定义函数，在你的VBA模块中植入以 ………………………………