新手练习的26个基础题目

佛山小老鼠

我用的是这段代码
Public Function 取数字(TT)
Dim I As Long
取数字 = ""
For I = 1 To Len(TT)
If IsNumeric(Mid(TT, I, 1)) = True Then
取数字 = 取数字 & Mid(TT, I, 1)
End If
Next I

End Function

playss

我也来学习一下，
谢谢楼主提供机会

refresh25

怎么看不见啊。。

jxc4311

不错，不错，从易至难，里面覆盖了很多基础知识，关注ing。

nao

练习了大半题目，边学习边练习，太谢谢楼主了，非常有用！

7786910

以“收入562.00元”为例

1、FIND()告诉我，0-9在文本中第一次出现的位置。

用Find()在指定的文本中查找0-9，会返回第一次出现的位置，如果没有会返回一个错误值，聪明的gvntw，在文本后面连接上1234567890，让Find()不再有借口返回错误值，请放心，它不会影响后面的结果。在编辑栏中，像下面一样，用鼠标将这一段文本抹黑，然后按F9。


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

2、对着 Min()，王小丫说：恭喜你，答对了，第一个数字在第3位。

如果你还怀疑，可以这再次抹黑，并按F9。


引用:
=LOOKUP(9E+307,--MID(A1,MIN({7;8;5;12;13;3;4;16;17;18}),ROW(INDIRECT("1:"&LEN(A1)))))

3、神奇魔术师 Mid() ，一个文本变出许许多多。

让事实说话，继续抹抹黑，按F9。开始位置不变，长度依次增1，形成一个数组，数组的个数等于文本长度(Row()的结果)。后面的会出现相同的情况，没关系，还是不影响结果的。


引用:
=LOOKUP(9E+307,--MID(A1,3,ROW(INDIRECT("1:"&LEN(A1)))))

4、如果忽略了--，还是功亏一篑。

看看，它的结果会是什么呢？


引用:
=LOOKUP(9E+307,--{"5";"56";"562";"562.";"562.0";"562.00";"562.00元";"562.00元";"562.00元"})

5、Lookup() 总是那么沉着，他闭着眼睛说，我就要最后面那个数字。


引用:
=LOOKUP(9E+307,{5;56;562;562;562;562.00;#VALUE!;#VALUE!;#VALUE!})

9E+307 是一个非常大的数，在任何时候都适用，如果你知道你的文本中最大数的范围，比如1000，文本中的数字不会超过1000的，那么，这个数字你用1000，也是行的，即：

Lookup(1000,……)

行了，再次感谢版主，你说呢？

xly8585

谢谢楼主的题目！

hfgpcwx

下来学习了.感谢.

evi7691

学习了，谢谢楼主。

暗夜明岚

哇 好东西啊 连步骤都有了谢谢啊！