Makro in Spalte
18.09.2018 11:29:02
PaLu
ich wäre sehr dankbar, wenn mir vielleicht jemand weiterhelfen könnte.
Ich möchte mittels Makro eine Formel in eine Spalte bringen, aber irgendwo hakt es.
(Laufzeitfehler '1004' Anwendungs- oder objektdefinierter Fehler)
Dies ist das Makro:
Sub Gegenkonto()
Dim Zelle As Range
Dim Nr As Long
For Each Zelle In ActiveSheet.Range("E2:E")
Nr = Zelle.Row
Zelle.FormulaLocal = "=WENN(RC[4]>0,""3300"",""3400"")"
Next Zelle
End Sub
Zur Veranschaulichung nochmal eine Erklärung:
Anzeige