Betrifft: Datum und dazugehöriger Wert addieren
von: 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
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hajo_Zi
Geschrieben am: 09.01.2010 12:43:46
Hallo Hans,
Summewenn()
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Josef Ehrensberger
A | B | C | D | E | F | G | H | |
1 | Datum | Wert | Datum | Anzahl | Summe | |||
2 | 01.12.2009 | 10 | 02.12.2009 | 3 | 45 | |||
3 | 01.12.2009 | 20 | ||||||
4 | 02.12.2009 | 15 | ||||||
5 | 02.12.2009 | 20 | ||||||
6 | 02.12.2009 | 10 | ||||||
7 | 03.12.2009 | 20 |
Formeln der Tabelle | ||||||
|
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hans
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hajo_Zi
A | B | C | D | E | F | |
24 | Datum | Wert | Datum | Summe | ||
25 | 1.12.09 7:23 | 10 | 01.12.2009 | 30 | ||
26 | 1.12.09 9:23 | 20 | ||||
27 | 2.12.09 0:00 | 15 | ||||
28 | 2.12.09 0:00 | 20 | ||||
29 | 2.12.09 0:00 | 10 | ||||
30 | 3.12.09 0:00 | 20 |
verwendete Formeln | |
Zelle | Formel |
F25 | {=SUMME(WENN(TEXT(A25:A30;"TT.MM.JJ")*1=E25;B25:B30))} |
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Josef Ehrensberger
' **********************************************************************
' 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
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hans
Geschrieben am: 09.01.2010 13:28:14
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
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Josef Ehrensberger
Geschrieben am: 09.01.2010 13:32:24
Hallo Hans,
warum der Umweg über eine Zelle? Warum Selection?
Selection.Offset(0, 3) = Date
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hans
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
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: BoskoBiati
A | B | C | D | E | |
9 | 15.12.2009 10:30 | 4 | 15.12.2009 | 2 | 9 |
10 | 15.12.2009 11:00 | 5 | |||
11 | 16.12.2009 10:00 | 7 | |||
12 | 17.12.2009 08:00 | 8 |
Formeln der Tabelle | ||||||
|
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Josef Ehrensberger
A | B | C | D | E | F | G | H | |
1 | Datum | Wert | Datum | Anzahl | Summe | |||
2 | 01.12.2009 | 10 | 02.12.2009 | 3 | 45 | |||
3 | 01.12.2009 | 20 | ||||||
4 | 02.12.2009 | 15 | ||||||
5 | 02.12.2009 | 20 | ||||||
6 | 02.12.2009 | 10 | ||||||
7 | 03.12.2009 | 20 | ||||||
8 |
Formeln der Tabelle | ||||||
|
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hans
=SUMMENPRODUKT((GANZZAHL(A2:A1000)=E2)*B2:B1000)
Wie müsste die Formel lauten wenn eine weitere Bedingung erfüllt ist.
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: BoskoBiati
Geschrieben am: 09.01.2010 15:14:23
Hallo,
dann einfach noch *(c1:c100=333) einfügen.
Gruß
Bosko
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hajo_Zi
Geschrieben am: 09.01.2010 13:12:17
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
Betrifft: AW: Datum und dazugehöriger Wert addieren
von: Hans
Geschrieben am: 09.01.2010 13:51:19
Hallo Hajo ..
bei TYP () kommt eine 1 raus
Gruß Hans