从字符串中提取数字,看看能不能取得新的突破?(又新增到2题,带有多负号的字串)

makelot

VBA不需要过分绞尽脑汁，就可以解决很复杂的问题。
但不能否认，一个好的公式，它需要的思辨过程有时候会远远大于VBA编程。
等待精炼的公式出现……

学良

等待精炼的公式出现……

yongquan83

期待高手出现，从而能够有更多的机会－－学习

wddn

80字符，离要求又近了一步：
=MID(A4,MIN(FIND(LEFT(ROW($1:$11)-2),A4&-5^19)),1+COUNT(-MID(A4,COLUMN(1:1),2)))
数组公式。
字符串中数字须连续，且只有一个子串为数字。

[ 本帖最后由 wddn 于 2008-11-6 21:30 编辑 ]

icongmu

原帖由 wddn 于 2008-11-6 21:25 发表
80字符，离要求又近了一步：
=MID(A4,MIN(FIND(LEFT(ROW($1:$11)-2),A4&-5^19)),1+COUNT(-MID(A4,COLUMN(1:1),2)))
数组公式。
字符串中数字须连续，且只有一个子串为数字。

wddn老师很强！学习了，轻舟上逆的公式为73字符。看看还有没有人能超越~~

wshcw

wddn师兄很强！公式中"LEFT(ROW($1:$11)-2)"这部分很有创新,学习,我目前的公式都是84字以上,贴出来大家看看,(分别是84,85,86字符),给个简化意见.
=MID(A1,MIN(FIND(CHAR(ROW($45:$57)),A1&5^19&"/.-")),COUNT(-MID(A1,COLUMN(1:1),2))+1)
=MID(A1,MIN(FIND(MID(-5^19,ROW($1:$15),1),A1&-5^19)),1+COUNT(-MID(A1,COLUMN(1:1),2)))
=MID(A1,MIN(FIND({1;2;3;4;5;6;7;8;9;0;"-"},A1&-5^19)),1+COUNT(-MID(A1,COLUMN(1:1),2)))
与轻舟上逆相比还有十万八千里,这就是差距呀!

wddn

搜索到g一个网页：
http://office.microsoft.com/zh-c ... 052.aspx?mode=print

makelot

我只好勇于在擂台旁边当观众了

fdd

原帖由 wddn 于 2008-11-6 21:25 发表
80字符，离要求又近了一步：
=MID(A4,MIN(FIND(LEFT(ROW($1:$11)-2),A4&-5^19)),1+COUNT(-MID(A4,COLUMN(1:1),2)))
数组公式。
字符串中数字须连续，且只有一个子串为数字。

此公式思路很独特，但如果字符串中有多余的“-”时，会出错！

[ 本帖最后由 fdd 于 2008-11-7 05:56 编辑 ]

alzeng

想来楼主是有答案的，要不他不会要求一定是七十字之内的公式，^_^