2016-06-21 78 views
0

我试图从文本的大备注字段返回货币值,但是我有很多脏数据例如:“$ $ 12,500”InStr函数货币

InStr函数(1,[案例活动内容],“$”)

在上述情况下不起作用。出于某种原因,

InStr函数(1,[案例活动内容], “$#”)
InStr函数(1,[案例活动内容], “$ [1234567890]”)

所有失败。任何人都知道如何让InStr拿起第二个$?

回答

0

您可以使用拆分

DollarArray = Split([YourMemo], "$") 

' Now loop DollarArray for valid entries. 
' DollarArray(2) will hold: "12,500" 
+0

古斯塔夫感谢!不过,在这个阶段我不熟悉VBA。 可以用Access的内部函数完成吗? –

+0

嗯,_Split_是一个内部函数,但是你不能在表达式中运行循环。 – Gustav