Inputbox FormulaLocal

[silentwolf]

Hi hab mal wieder eine Frage...
habe diesen Code auf einen Lernvideo gefunden und dort funktioniert er auch..
Ich habe Ihn genau übernommen aber bei mir bekomme ich einen Laufzeitfehler 1004.
Weis jemand zufällig was da geändert werden muss damit er funktioniert?

Code [Auswählen] Erweitern

Sub EnterFormula()
    Dim MyFormula As String
   
    MyFormula = Application.InputBox(Prompt:="Enter a formula", Type:=0)
   
    Range("G2").FormulaLocal = MyFormula
End Sub


Danke
Lg

[Hondo]

Schreib einfach statt FormulaLocal "Formula", dann gehts.

Andreas

[silentwolf]

Hi Andreas,

vielen Dank!!

Schöne Grüße!
Albert