Identisch aufgebaute Tabellen wiederholt addieren

Sie arbeiten mit zwei gleich aufgebauten Tabellen, von denen eine aktuelle Monatswerte enthΣlt und die andere jeweils ⁿber das Jahr summierte Werte anzeigen soll. Sie m÷chten mit einem Makro den Inhalt der Monatstabelle jeweils zum Inhalt der Jahrestabelle addieren.

Kopieren Sie die Werte aus der Monatstabelle in die Zwischenablage und fⁿgen Sie danach die Inhalte mit angepassten Optionen in die Gesamttabelle ein. Markieren Sie dazu den ben÷tigten Datenbereich in der Monatstabelle und fⁿhren Sie den Befehl ╗Bearbeiten | Kopieren½ aus. Dann wechseln Sie zur Gesamttabelle und setzen den Cursor in die linke obere Ecke des Datenbereiches. Nun fⁿhren Sie den Befehl ╗Bearbeiten | Inhalte einfⁿgen½ aus. Im folgenden Dialog wΣhlen Sie im Bereich ╗Einfⁿgen½ die Option ╗Werte½ und im Abschnitt ╗Operation½ die Einstellung ╗Addieren½. Nach einem Klick auf ╗OK½ sehen Sie die gewⁿnschte Summe in der Gesamttabelle.
Zur Vermeidung von Fehlern k÷nnen Sie diese Rechnung per Makro durchfⁿhren lassen. Dazu wΣhlen Sie den Befehl ╗Extras | Makro | Makros½, geben als Makronamen zum Beispiel ╗Tabellen-Summierung½ ein und klicken auf ╗Erstellen½. Nun geben Sie im VBA-Editor folgende Anweisungen ein:

SubòSummierung()
Sheets(äMonatstabelleô).Select
Range(äB2:E12ô).Copy
Sheets(äGesamttabelleô).Select
Range(äB2ô).Select
Selection.PasteSpecialò
Paste:=xlValues,ò
Operation:=xlAdd,òSkipBlanks:=
False,òTranspose:=False
Range(äB2ô).Select
Sheets(äMonatstabelleô).Select
Range(äB2ô).Select
EndòSub