求助!EXCEL数字提取

makelot

见附件，关键是负号，我怎么也搞不定，苦恼ing……
希望大侠出手相助！

[ 本帖最后由 makelot 于 2008-11-3 18:40 编辑 ]

makelot

原帖由 wshcw 于 2008-11-6 17:08 发表
这贴要求比我的那个主题要简单一些.

呵呵！我的看法正相反。
它得到了比较完美的解决方案。

山菊花

=LOOKUP(9E+307,--MID(B6,MIN(FIND({0;1;2;3;4;5;6;7;8;9;"-"},B6&-1234567890)),ROW(INDIRECT("1:"&LEN(B6)))))

makelot

用 =LOOKUP(9E+307,--MID(B6,MIN(FIND({0;1;2;3;4;5;6;7;8;9},B6&1234567890)),ROW(INDIRECT("1:"&LEN(B6)))))  比较好，但不能提出负号
忘高人指点！

lt0000

D6=IF(ISERROR(FIND("-",B6)),"","-")&LOOKUP(9E+307,--MID(B6,MIN(FIND({0;1;2;3;4;5;6;7;8;9},B6&1234567890)),ROW(INDIRECT("1:"&LEN(B6)))))

makelot

呀！高手就是高！谢谢二位！

makelot

首先感谢it000和山菊花两位大侠的指点，不过我想让这个公式适应力更广一点，不要见怪
it000的方法存在一个问题，任意位置出现"-"号，就会将数字当成负数
个人感觉山菊花的方法较好，但当"-"号出现在其它位置或根本没有数字的时候，也会报错
那么，
当字符串中无数字，或当减号出现在其它位置时，能否也能得出正确答案？
望指点迷津，谢谢！

山菊花

写一个自定义函数，见附件。
未处理其它异常情况，如两个小数点等。

makelot

谢谢山菊花！高手！
我对VBA不太懂，不过我会打印出来好好研究一下。
再次感谢！并祝工作愉快，开心快乐每一天！

makelot

说明：里面的VBA函数是山菊花斑竹编写的，这里向他表示真诚的感谢！
问题：能否将此函数再修改一下，使之能够提出比如身份证那样的超长串数字？如若可能，最好首个数字为零的提出来
也能原样显示。我的水平实在太糟了，希望能得到大家的帮助，谢谢！
见下面新的附件