Office: automatisch Leerzeilen und Summen einfügen

Hallo Forum,

ich habe Daten, in denen eine Spalte aufsteigend sortiert ist.
Nun sollen immer zwei Leerzeilen eingefügt werden, wenn sich der Wert in dieser Spalte ändert. In der ersten eingefügten Zeile soll dann noch die Summe der Wertespalte gebildet werden und um jeden Bereich soll ein Rahmen.
Ich möchte das ganze in VBA automatisieren, habe aber keinen Ansatz, wie ich das umsetzen muss.

Zur Verdeutlichung habe ich eine Musterdatei angefügt.
Vielleicht kann mir jemand bei dieser Problemstellung helfen.

:)

 

Nutze das Feature "Teilergebnis":

1) Bereich markieren
2) Daten->Gliederung->Teilergebnis wählen
3) Einstellungen:
- Gruppieren nach "Data 2"
- Teilergebnisse addieren zu "Data 1"
- Ergebnisse ober- oder unterhalb nach Gusto


Das ist allerdings eine schlechte Lösung, wenn man mit der Liste weiter arbeiten will! Ich empfehle daher immer, Datenhaltung (Deine Liste mit den nackten Daten) und Auswertung oder Bericht (Deine summierte Liste) zu trennen.

 

woran scheitert es konkret?

Hast Du mal die Lösungen angeschaut, die man findet, wenn man den Betreff Deiner Frage beim großen G eintippt?

 

bist ja nicht wirklich gesprächig...

Code:

 

Hallo,

ich kann zwar nicht nachvollziehen, wofür diese Aufbereitung gut sein soll, aber mit Power Query habe ich mir die Darstellung einfach zusammengeklickt und anschliessend die Rahmen mittels bedingter Formatierungen eingefügt.

 

Danke Euch,

mit dem ganzen input komme ich gut weiter.

 

Hi akku,

bedeutet das:

[*]"Hört sich gut an - wir schaffen das!"
oder

[*]habs geprüft und hinbekommen

?

 

Hallo mase,

das bedeutet, dass ich es mit Eurer und Googles Hilfe hinbekommen habe.
Danke nochmal an dieser Stelle.

Jetzt habe ich das nächste Problem, werde dafür aber ein neues Thema eröffnen.
(natürlich erst, nachdem ich gegoogelt habe.)

 

Danke fürs Feedback.
Aber es möchte nicht missverstanden werden:
Ich konnte Deine Antwort lediglich nicht einordnen, deshalb hatte ich nachgefragt.

Nix für ungut *wink.gif*