Listing
Micha
ich hab da ein Makro was auch läuft und wüßte gern obs da in Excel was gibt das das auch macht.
Ich möchte die mit einen "x" markierten Zellen addieren.
Dim sum
For i = 2 To 5
If Not IsNumeric(Tabelle1.Cells(i, 3).Value) Then
sum = sum + Tabelle1.Cells(i, 1).Value
End If
Next i
Tabelle1.Cells(7, 3).Value = sum