Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
504to508
504to508
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Werte in Sheets addieren per Makro ???

Forumthread: Werte in Sheets addieren per Makro ?

Werte in Sheets addieren per Makro ?
27.10.2004 10:54:40
ralle
Guten Morgen zusammen!
Habe folgendes Problem das ich mit Eurer Hilfe zu lösen versuche:
Habe mehrer Tabellenblätter (die Anzahl kann variieren). Es sollen per Makro alle Werte in der Tabellenblätter in der Zelle D28 addiert werden und in einem neuen Tabellenblatt welches hinter dem letzten Tabellenblatt eingefügt wird ausgegeben werden.
Wie mache ich soetwas ?
Gruß
ralle
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte in Sheets addieren per Makro ?
Worti
Hallo ralle,
so geht's: (Summe steht im neuen Blatt wieder in D28)


Sub Addiere()
    Dim Summe As Double
    Dim ws As Worksheet
    
    Summe = 0
    
    For Each ws In ActiveWorkbook.Worksheets
        Summe = Summe + ws.Cells(28, 4).Value
    Next ws
    
    Worksheets.Add.Move After:=Worksheets(Worksheets.Count)
    ActiveSheet.Cells(28, 4).Value = Summe
    
End Sub
Anzeige
AW: Werte in Sheets addieren per Makro ?
27.10.2004 11:49:39
ralle
Hallo Worti,
Dake für deine schnelle Antwort, das klappt schon wunderbar. Habe aber noch eine Kleinigkeit vergessen. Die Summierung solle erst ab dem 3 Tabellenblat beginnen.
Was muss ich bei dem Makro ändern ?
Gruß
Ralle
AW: Werte in Sheets addieren per Makro ?
Worti
Hallo ralle,
dann so:


Sub AddiereNo2()
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum