ich habe eine Excel welche eine Bestandsliste ist.
Ich habe 3 Zellen welche miteinander addiert und subtrahiert werden.
In der 1 Zeile funktioniert es super.
Nun möchte ich aber die gleiche Rechnung in einer Schleife zur nächsten Zeile geht und dort das selbe ausrechnet und dann wieder zur nächsten Zeile bis Zeile 218.
Wie mache ich das?
LG
Sub rechnen()
Dim Punkte
Dim Verfügbar
Dim Entnohmen
Dim Hinzugefügt
Verfügbar = Sheets("Bestandsentnahmeliste").Range("E5")
Entnohmen = Sheets("Bestandsentnahmeliste").Range("D5")
Hinzugefügt = Sheets("Bestandsentnahmeliste").Range("F5")
Punkte = Hinzugefügt + Verfügbar - Entnohmen
Sheets("Bestandsentnahmeliste").Range("E5").Value = Punkte
Sheets("Bestandsentnahmeliste").Range("D5").Clear
Sheets("Bestandsentnahmeliste").Range("F5").Clear
End Sub