VBA Formeln in Zellen schreiben

[Majusch]

Hallo allerseits,

Heute versuche ich, in VBA eine Zelle mit einer Formel zu befüllen.
Hier erstmal die Formel, welche ich in eine Zelle schreiben möchte :

Code:

=WENNNV(WENN(SVERWEIS($B26;Gruppierung!F:F;1;FALSCH)=$B26;INDEX(Gruppierung!B:B;VERGLEICH($B26;Gruppierung!F:F;0));Error);"Nicht zugeordnet")

Mein VBA Code (gekürzt der Einfachheit halber) :

Code:

Sub newComp()
Dim Benutzererfassung As String
Benutzererfassung = "=WENNNV(WENN(SVERWEIS($B26;Gruppierung!F:F;1;FALSCH)=$B26;INDEX(Gruppierung!B:B;VERGLEICH($B26;Gruppierung!F:F;0));Error);""Nicht zugeordnet"")"
    For WS = 200 To 250 Step 1
            If Cells(WS, 2) = "PLACEHOLDERWSE" Then
              If IsEmpty(Cells(WS - 1, 2).Value) = False Then
                Cells(WS, 3).Formular = Benutzererfassung
              Exit For
            End If
        End If
    Next WS
End Sub

Der Code funktioniert soweit, bis auf den Part mit der Formel, dementsprechend liegt der Fehler auch sicher dort.

Fehlermeldung die VBA spuckt ist :

Laufzeitfehler '438':

Objekt unterstützt diese Eigenschaft oder Methode nicht.


Hat jemand eine Idee woher dieser Fehler stammt? Stehe leider aktuell komplett aufm Schlauch und kriege meinen Code nicht gefixt, wäre toll wenn mir da wer weiterhelfen kann.

Lg, Majusch

[Kuwer]

Hallo Majusch,

lass einfach mal das "r" weg.

Gruß Uwe

---

bzw. ersetze es durch "Local", da Du die Formel in Deutsch eintragen willst.

[Majusch]

Ich fass mir an den Kopf, wie peinlich  :29: 
Kriege jetzt aber leider eine neue Fehlermeldung :

Laufzeitfehler '1004':

Anwendungs- oder objektorientierter Fehler

Noch irgendwelche Ideen?

LG

EDIT :

Habs selber hinbekommen, FormulaLocal war die Lösung, vielen Dank!