Formel mit VBA einfügen
30.08.2019 09:36:38
Bernd
ich habe gerade eine Formel mit VBA in meinem Code eingefügt, allerdings meckert der Editor immer gleich "Fehler beim Compilieren: erwartet Anweisungsende".
Über die Formel möchte ich mir die Überschrift für ein Pivot-Diagramm automatisch zusammenfassen lassen.
Code zur Formel:
.Cells(1, 7).FormulaLocal = _
"=WENN(UND(E1"""";E2"""";E3"""");""Warranty Status "" & A1 & "": "" & E1 & "" "" & A2 & _
"": "" & E2 & "" "" & A3 & "": "" & E3 & _
";WENN(UND(E1"""";E2"""";E3=""""); ""Warranty Status "" & A1 & "": "" & E1 & "" "" & A2 & _
"": "" & E2 & _
";WENN(UND(E1"""";E2="""";E3"""");""Warranty Status "" & A1 & "": "" & E1 & "" "" & A3 & " _
": "" & E3 & _
";WENN(UND(E1="""";E2"""";E3"""");""Warranty Status "" & A2 & "": "" & E2 & "" "" & A3 & " _
": "" & E3 & _
";WENN(UND(E1"""";E2="""";E3="""");""Warranty Status "" & A1 & "": "" & E1 & _
";WENN(UND(E1="""";E2"""";E3="""");""Warranty Status "" & A2 & "": "" & E2 & _
";WENN(UND(E1="""";E2="""";E3"""");""Warranty Status "" & A3 & "": "" & E3;""Warranty Status"" _
)))))))"
Interessanterweise meckert der Compiler erst bei der zweiten "Wenn"-Zeile, nicht bei der ersten... Ich versteh das gerade nicht mehr.
Muss ich die ";" am Anfang einer jeden Zeile vielleicht anders setzen?
Kann mir bitte jemand bei der Fehlersuche helfen?
Danke und Grüße, Bernd
