访问Instr Vba

n1no91

我想将bi!hersteller和bi!produktname复制到新字段中,但是当bi!hersteller已经在bi!produktname中时,它只能将bi!produktname复制到新字段中,所以我将向您展示我已经尝试过的代码

 If InStr(1, Bi!Hersteller, Bi!Produktname, 1) > 0 Then ....

 If InStr(1, Bi!Hersteller, Bi!Produktname, 1) Len(Bi!Hersteller) Then ....

要么根本找不到Bi!Produktname中的字符串Bi!Hersteller,要么InStr的返回不正确...

一个例子

Bi!Hersteller = "Siemens"
Bi!Produktname = "Siemens LC67KA532"

新字段应为 "Siemens LC67KA532"

里奥·夏皮罗(Leo Chapiro)

尝试这个:

Dim sNewField
Dim Bi!Hersteller : Bi!Hersteller = "Siemens"
Dim Bi!Produktname : Bi!Produktname = "Siemens LC67KA532"

If InStr(Bi!Produktname, Bi!Hersteller) > 0 Then
   sNewField = Bi!Produktname
Else
   sNewField = Bi!Hersteller & Bi!Produktname
End If

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章