Hallo zusammen,
Ich komme wieder mit einem VBA Code an meine Grenzen, vielleicht kann mir ja hier jemand helfen.
Und zwar habe ich ein Dokument in welchem via Button Zeilen und Spalten eingefĂŒgt werden können.
Die GrĂŒnen KĂ€stchen bilden jeweils die Summen der Werte darĂŒber (auĂer bei Zielwert&Istwert, da werden die Summen der Werte von links gebildet)
Dadurch das die Datei so dynamisch ist (da man Spalten & Zeilen einfĂŒgen und löschen kann) habe ich Probleme die Summenformel so dynamisch zu gestalten das immer die richtige Summe berechnet wird.
Mein Ansatz bisher ist wie folgt:
Dim n
Dim Summe
For n = 5 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(n, 1).Value = "Test1" Then
Summe = Summe + Cells(n, 4).Value
End If
Next
Cells(n - 10, 4).Value = Summe
For n = 5 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(n, 1).Value = "Test 2" Then
Summe = Summe + Cells(n, 4).Value
End If
Next
Cells(n - 4, 4).Value = Summe
End Sub
Problem ist das ich mit dieser Methode fĂŒr jede Summe diesen Code schreiben muss, und wenn ich weiter in die Spalten nach rechts gehe zĂ€hlt der Code alle Werte anstelle nur der Werte der jeweiligen Spalte.
Hat hier jemand eine Alternative Lösung fĂŒr das Problem?
Vielen Dank im Voraus!