|
Hey Marco,
Sorry das ich mich jetzt erst melde, aber bei uns ist nun Kurzzeit angesagt und um die Zeit etwas sinnvoll zu nutzen, habe ich mich für eine kleine VBA-Schulung angemeldet und hoffe so zukünftig einfach mehr zu verstehen.
Jetzt habe ich allerdings das erste mal ein Prblem was ich nicht vertshe und hoffe, du kannst mir vielleicht meinen Fehler aufzeigen.
Die Aufgabe lautet wie folgt
Schreibe nun ausschließlich Zahlen in die Spalte neben die Wörter aus der Aufgabe 4. Summiere nun mit Hilfe einer For-Schleife die Zahlen auf und gibt ausschließlich das Ergebnis (die Summe) aus. Die Wörter könnten Produktnamen und die Zahlen den Lagerbestand abbilden. Du möchtest wissen, wie viele Produkte insgesamt im Lager sind.
Hinweis: du musst die einzelnen Werte in einer Variable addieren.
meine Lösungsansatz schaut so hier aus.
Sub SchleifeAdierenDerWerte()
Dim i As Integer
Dim Summe As Integer
For i = 1 To 10 Step 1
Summe = (ActiveWorkbook().Sheets("Spiele").Cells(i, 2))
Summe = (Summe + i)
ActiveWorkbook().Sheets("Spiele").Cells(11, 2).Value = Summe
Next i
End Sub
Aber der Wert der am Ende rauskommt, passt so garnicht.
irgend wo habe ich was falsch gemacht und finde einfach den fehler nicht,
|