Hi,
ich habe ein tabelle folgender Art von unbestimmter laenge
3Mabc 456
3Mbge 157
3Mdkl 278
5Msdf 457
V23gg 456
...
Ich moechte jetzt alles Zahlen der zweiten spalte summieren wenn sie vom gleichen typ (sprich 3M..., 5M..., ... sind)
Das muesste ja eigentlich in der Form:
Aber irgendwie geht es nicht.Ich denke es liegt an InStr(Sheets(1).Cells(i, 2).Value, "3M") ? Habt ihr ne Idee?
Danke Gruss
ich habe ein tabelle folgender Art von unbestimmter laenge
3Mabc 456
3Mbge 157
3Mdkl 278
5Msdf 457
V23gg 456
...
Ich moechte jetzt alles Zahlen der zweiten spalte summieren wenn sie vom gleichen typ (sprich 3M..., 5M..., ... sind)
Das muesste ja eigentlich in der Form:
Code:
Sheets(1).Cells(2, 6).Value = 0
For i = 2 To 9000
If InStr(Sheets(1).Cells(i, 2).Value, "3M") > 0 Then
Sheets(1).Cells(2, 6).Value = Sheets(1).Cells(2, 6).Value + Sheets(1).Cells(i, 2).Value
End If
Next i
Aber irgendwie geht es nicht.Ich denke es liegt an InStr(Sheets(1).Cells(i, 2).Value, "3M") ? Habt ihr ne Idee?
Danke Gruss