Ich habe einen Code, leider wird mir in der entsprechenden Zelle, in der ausgegeben werden soll, nur #NAME? ausgegeben.Woran liegt das? Kann mir da jemand helfen und hat einen Tipp parat?
Option Explicit
Sub Berechnungen()
Dim iii As Long
Dim da1 As Boolean
With Worksheets("Datenzusammenführung")
For iii = 2 To 1000
If Cells(iii, 1).Interior.ColorIndex = 19 Then
Range("a10").Formula = "=ZÄHLENWENNS(Datenzusammenführung!D:D,""S8"",Datenzusammenfü _
hrung!G:G,""C 1"",Datenzusammenführung!L:L,""VT"")"
End If
Next iii
End With
End Sub
Zur Erklärung des Codes: Wenn in Spalte A die zu untersuchende Zelle die Farbe 19 aufweist, dann soll anschließend eine Formel ausgeführt werden. Das Ergebnis soll in Zelle A10 ausgegeben werden.
Viele Grüße, Vigo