ich hoffe mir kann bei meinem, nachfolgend beschriebenen, Problem geholfen werden.
Das Problem ist , daß in der nachstehenen Formel(Wenn, Istfehler, Sverweis) VBA ein Hochkomma in die Formel schreibt und die Formel dadurch nicht Ihre Funktion erfüllt.
Die Bezugszelle der Formel Sverweis wird sozusagen in Hochkommata gesetzt, nur das Exel dann die Formel nicht richtig erkennt.
VBA Formel:
essen = 12
For i = 6 To 150 Step 1
Range("D" & i).Select
ActiveCell.Formula = "=IF(ISERROR(VLOOKUP(B" & i & ",'[Shop_VK-Zahlen 03.04.02.xls]Tabelle1'!R1C2:R82C70," & essen & ",FALSE)),0,VLOOKUP(B" & i & ",'[Shop_VK-Zahlen 03.04.02.xls]Tabelle1'!R1C2:R82C70," & essen & ",FALSE))"
Next i
Excel Formel:
=WENN(ISTFEHLER(SVERWEIS('B6';'[Shop_VK-Zahlen 03.04.02.xls]Tabelle1'!$B$1:$BR$82;12;FALSCH));0;SVERWEIS('B6';'[Shop_VK-Zahlen 03.04.02.xls]Tabelle1'!$B$1:$BR$82;12;FALSCH))
Vielen Dank im Vorraus.
Marko Albrecht