Kann Fehler in Makro nicht finden

Folgende Ursprungsformel funktioniert:

Function FORMEL_1(Zelle)
Application.Volatile
If Left(Zelle.FormulaLocal, 1) = "=" Then _
FORMEL_1 = Right(Zelle.FormulaLocal, Len
(Zelle.FormulaLocal) - 1) Else _
FORMEL_1 = ""
End Function

Nach einigen Veränderungen sowie dem Einfügen von "VBA.Left" funktioniert nun nichts mehr (Fehlermeldung:"Argument ist nicht optional"):

Function FORMEL_1(Zelle As Range) As String
If VBA.Left(Zelle.HasFormula) Then _
FORMEL_1 = Right(Zelle.FormulaLocal, Len
(Zelle.FormulaLocal) - 1) Else _
FORMEL_1 = ""
End Function

Oder ist etwa alles falsch???

Danke!
Martin