Formule plaatsen met VBA in een Cell

[bontekite]

Kan iemand mij hierbij helpen wat is in mijn vba regel verkeerd is ?

Ik wil deze formule in een cel plaatsen.
Dit is de formule die werkt in het excel document.

=ALS.FOUT(ALS(ZOEKEN(1000;VIND.SPEC(Korte_omschrijving1;G2))>0;"x");ALS.FOUT(ALS(ZOEKEN(1000;VIND.SPEC(Lange_omschrijving1;G2))>0;"x");ALS.FOUT(ALS(ZOEKEN(1000;VIND.SPEC(Leverancier1;G2))>0;"x");ALS.FOUT(ALS(ZOEKEN(1000;VIND.SPEC(Artikelnummer1;F2))>0;"x");""))))




dit is de vba formule maar ik krijg hier steeds een foutmelding 1004

"=IFERROR(IF(LOOKUP(1000,SEARCH(Korte_omschrijving1,RC[6]))>0,""x"");IFERROR(IF(LOOKUP(1000,SEARCH(Lange_omschrijving1,RC[6]))>0,""x"");IFERROR(IF(LOOKUP(1000,SEARCH(Leverancier1,RC[6]))>0,""x"");IFERROR(IF(LOOKUP(1000,SEARCH(Artikelnummer1,RC[5]))>0,""x"");,""""))))"



ik heb al van alles geprobeerd en op internet gezocht of dit anders kan of moet.


Bijvoorbaat dank voor de hulp

groeten Ben Bonte

 

[edmoor]

Probeer deze eens:

"=IFERROR(IF(LOOKUP(1000,SEARCH(Korte_omschrijving1,R[1]C[6]))>0,""x""),IFERROR(IF(LOOKUP(1000,SEARCH(Lange_omschrijving1,R[1]C[6]))>0,""x""),IFERROR(IF(LOOKUP(1000,SEARCH(Leverancier1,R[1]C[6]))>0,""x""),IFERROR(IF(LOOKUP(1000,SEARCH(Artikelnummer1,R[1]C[5]))>0,""x""),""""))))"

 

[bontekite]

Hartelijke dank
Dit was inderdaad de oplossing .

Groeten
Ben