Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Datum und dazugehöriger Wert addieren | Herbers Excel-Forum

Forumthread: Datum und dazugehöriger Wert addieren

Datum und dazugehöriger Wert addieren
09.01.2010 12:40:50
Hans

Hallo Leute,
ich habe ein Problem bei einer Auswertung.
Ich möchte die Anzahl eines jeden Tages einer Spalte haben .. und dann die Summe der Werte die eine Spalte daneben stehen.
Also in Spalte A stehten untereinander das Datum ... und in Spalte B die dazugehörigen Werte.
Als Beispiel .. ich benötige eine Formel die mit die Anzahl der Daten vom 02.12.2009 ausgibt und die Summer der jeweils daneben stehenden Preis.
Ich hoffe jemand kann mir helfen

Anzeige

14
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 12:43:46
Hajo_Zi
Hallo Hans,
Summewenn()

AW: Datum und dazugehöriger Wert addieren
09.01.2010 12:45:29
Josef Ehrensberger
Hallo Hans,
AW: Datum und dazugehöriger Wert addieren
09.01.2010 12:58:26
Hans
Danke euch Beiden
Ich hatte es auch so .. aber es Funktionierte nich.
Nun weiss ich auch weshalb ... Das Datum wird per VBA in die Tabelle eingetragen und steht dort mit der Uhrzeit .. also zb 01.12.2009 12:22:44
Könnt Ihr mir helfen wie ich
a) die vorhandenen Werte auf das reine Datum im Format TT:MM:JJJJ ändern kann. Wenn ich es über "Zelle formatieren" änderen will funktioniert es nicht.
b) wie ich das Format des Datums im VBA festlegen kann das es in den o.g. Format gespeichert wird.
Gruß Hans
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:05:35
Hajo_Zi
Hallo Hans,
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:07:46
Josef Ehrensberger
Hallo Hans,
zu 1: Lass mal diesen Code über die Tabelle laufen, evtl. Bereich anpassen.
' **********************************************************************
' Modul: Modul2 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Sub uhrzeitentfernen()
  Dim rng As Range
  
  For Each rng In Range("A:A").SpecialCells(xlCellTypeConstants, xlNumbers)
    If IsDate(rng) Then rng = Clng(rng)
  Next
  
End Sub

Zu 2: Das hängt vom Code ab. Evtl. mit CLng(), aber zeig doch mal den Code.
Gruß Sepp
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:28:14
Hans
Ich habe eine Zelle in der mit "=jetzt()" das Datum .. der Name der Zelle ist auch "Datum
Im VBA nutze ich einfach diese Zelle mit
Selection.Offset(0, 3) = Datum
lg
Hans
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:32:24
Josef Ehrensberger
Hallo Hans,
warum der Umweg über eine Zelle? Warum Selection?

Selection.Offset(0, 3) = Date

Gruß Sepp
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:46:19
Hans
Hallo Sepp, danke für die Hilfe.
Das VBA Skript schreibt alle Wert die in einem Tabellenblatt eingegeben werden in eine Zeile in der Datei Auftrag.xls

Datum = Range("datum")
Windows("Auftrag.xls").Activate
With Sheets("Daten").Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
Set c = .Find(spe8, LookIn:=xlValues)
If Not c Is Nothing Then
c.Select
GoTo weiter
End If
Cells(Cells(Rows.Count, 1).End(xlUp).Row + 1, 1).Select 'letzte leere zelle
GoTo weiter
End With
weiter:
ActiveCell.Select
ActiveCell = spe8
Selection.Offset(0, 1) = RechnungsNr
Selection.Offset(0, 2) = KundenNr
Selection.Offset(0, 3) = GeraeteNummer
Selection.Offset(0, 4) = ExterneNummer
Selection.Offset(0, 5) = AuftragsDatum
Selection.Offset(0, 6) = RechnungsDatum
ActiveWorkbook.Save

Noch etwas, bei dem Skript das du mir zum löschen der Uhrzeit gegeben hast entsteht ein problem
ab 12 Uhr wird es auf den nächten Tag geschrieben.
lg
Hans
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:55:22
BoskoBiati
Hallo,
die Formel geht auch mit Deinen Werten, wenn man sie etwas abwandelt:
AW: Datum und dazugehöriger Wert addieren
09.01.2010 14:07:21
Josef Ehrensberger
Hallo Hans,
hab ehrlichgesagt, keine Lust diesen Code aufzudröseln, da sind mir zuviele Activates und Selects drinnen.
Ausserdem ist das ja nur ein Teil des Codes.
Nimm diese Formeln, das sollte funzen.
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 15:08:26
Hans
Ihr seit klasse und habt mein Wochenende gerettet.
Eine Frage habe ich noch .... dann gebe ich auch Ruhe.
Das letzte Beispiel von Sepp funktioniert 1A

=SUMMENPRODUKT((GANZZAHL(A2:A1000)=E2)*B2:B1000)
Wie müsste die Formel lauten wenn eine weitere Bedingung erfüllt ist.
In Spalte C stehen Zahlen
Es soll die Gesammtsumme gezählt werden wenn das Datum stimmt UND der Wert in Spalte C z.b 333 ist.
https://www.herber.de/bbs/user/67102.xls
lg
Hans
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 15:14:23
BoskoBiati
Hallo,
dann einfach noch *(c1:c100=333) einfügen.
Gruß
Bosko
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:12:17
Hajo_Zi
Hallo Hans,
es ist mir jetzt erst beim zweiten lesen aufgefallen. Ist es vielleicht kein Datum sondern Text? Mal mit TYp() prüfen.
Gruß Hajo
Anzeige
AW: Datum und dazugehöriger Wert addieren
09.01.2010 13:51:19
Hans
Hallo Hajo ..
bei TYP () kommt eine 1 raus
Gruß Hans
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Datum und dazugehöriger Wert addieren in Excel


Schritt-für-Schritt-Anleitung

  1. Daten organisieren: Stelle sicher, dass deine Daten in Spalte A (Datumswerte) und Spalte B (dazugehörige Werte) korrekt eingetragen sind.

  2. Formel eingeben: Verwende die SUMMEWENN()-Funktion, um die Summe der Werte in Spalte B zu berechnen, die einem bestimmten Datum in Spalte A entsprechen. Die allgemeine Syntax lautet:

    =SUMMEWENN(A:A, "02.12.2009", B:B)

    Diese Formel summiert alle Werte in Spalte B, wenn das Datum in Spalte A dem 02.12.2009 entspricht.

  3. Datum ohne Uhrzeit: Falls du mit Datumsangaben arbeitest, die auch eine Uhrzeit enthalten, kannst du die Funktion GANZZAHL() verwenden, um nur das Datum zu berücksichtigen:

    =SUMMENPRODUKT((GANZZAHL(A2:A1000)=E2)*B2:B1000)
  4. Erweiterte Bedingungen: Wenn du zusätzlich eine Bedingung für eine andere Spalte (z.B. C) einfügen möchtest, erweitere die Formel:

    =SUMMENPRODUKT((GANZZAHL(A2:A1000)=E2)*(C2:C1000=333)*B2:B1000)

Häufige Fehler und Lösungen

  • Datum als Text: Überprüfe, ob das Datum als Text gespeichert ist. Nutze die Funktion TYP(), um den Datentyp zu ermitteln. Ein Wert von 1 bedeutet, dass es sich um ein Datum handelt. Wenn nicht, konvertiere die Werte mit:

    For Each rng In Range("A:A").SpecialCells(xlCellTypeConstants, xlNumbers)
      If IsDate(rng) Then rng = CLng(rng)
    Next
  • Falsche Summen: Wenn die Summen nicht stimmen, überprüfe, ob die Datumsformate übereinstimmen. Achte darauf, dass die Zellformate korrekt auf Datum eingestellt sind.


Alternative Methoden

  • Pivot-Tabellen: Eine Pivot-Tabelle kann eine effiziente Methode sein, um Summen für verschiedene Datumsangaben zu berechnen. Du kannst die Datumswerte als Zeilenfeld und die Werte als Wertefeld hinzufügen.

  • Power Query: Mit Power Query kannst du Daten importieren und transformieren. Dies erlaubt dir, Daten nach Datum zu filtern und Summen zu bilden.


Praktische Beispiele

  1. Summe für ein bestimmtes Datum:

    =SUMMEWENN(A:A, "01.01.2020", B:B)

    Diese Formel summiert alle Werte für den 01.01.2020.

  2. Summe für mehrere Bedingungen:

    =SUMMENPRODUKT((A2:A1000="01.01.2020")*(C2:C1000=333)*B2:B1000)

    Hier wird die Summe für den 01.01.2020 und den Wert 333 in Spalte C berechnet.


Tipps für Profis

  • Datum um Jahre erhöhen: Um 5 Jahre zu einem Datum hinzuzufügen, benutze die Funktion DATUM(). Beispiel:

    =DATUM(JAHR(A1)+5, MONAT(A1), TAG(A1))
  • Automatisierung mit VBA: Wenn du oft mit Datumsberechnungen arbeitest, kannst du VBA verwenden, um diese Prozesse zu automatisieren.


FAQ: Häufige Fragen

1. Wie kann ich mehrere Datumsformate in einer Spalte verarbeiten?
Du kannst die Funktion TEXT() verwenden, um Datumsformate zu vereinheitlichen.

2. Wie kann ich ein Datum in Excel um Jahre addieren?
Verwende die DATUM()-Funktion, um Jahre, Monate und Tage zu einem Datum hinzuzufügen. Beispiel:

=DATUM(JAHR(A1)+5, MONAT(A1), TAG(A1))

3. Was tun, wenn die Zeit beim Datum stört?
Verwende die GANZZAHL()-Funktion, um nur das Datum ohne Zeit zu verwenden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige