ich möchte den Wert der Aktiven Zelle in die Variable "Differenz" übergeben.
Vielleicht wichtig: Die Zahl die in der aktiven Zelle steht, ist eine Formel (Summewenn)
Markus
Dim dblDiff As Double
If IsNumeric(ActiveCell) Then dblDiff = ActiveCell
ActiveCell = DeineVariable