|
Hallo nochmal,
eine andere Moeglichkeit waere natuerlich, was du vielleicht erreichen wolltest(?), die Berechnung direkt in VBA durchzufuehren, ohne die Formel in die Zelle einzutragen:
With ActiveSheet
If .Range(.Cells(1, 1), Cells(1, 3)) = .Range(.Cells(10, 1), .Cells(10, 3)) Then
ActiveCell = .Cells(1, 18) * .Cells(2, 18) / .Cells(3, 18)
End If
End With
Die Frage hier ist allerding, ob du die 3 Zellen einzeln miteinander vergleichen musst. Das verstehe ich nicht so genau.
|