|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
03.03.2008 12:50:14 |
oracle |
|
|
|
04.03.2008 10:52:13 |
Holger |
|
|
|
04.03.2008 18:29:05 |
oracle |
|
|
 Aw:Aw:Aw:Summierung Stunden pro Monat ?????? |
05.03.2008 10:12:17 |
Holger |
|
|
Von:
Holger |
Datum:
05.03.2008 10:12:17 |
Views:
481 |
Rating:
|
Antwort:
|
Thema:
Aw:Aw:Aw:Summierung Stunden pro Monat ?????? |
Hallo oracle,
ich habe da mal etwas quick and dirty programmiert. Dabei gehe ich mangels weiterer Informationen davon aus, dass du deine Werte in den Spalten A bis D in einem Tabellenblatt untergebracht hast. Das Ergebnis lasse ich in den Spalten F bis H anzeigen. Diese werden vorher gelöscht. Falls du andere Speicherorte hast, kannst du das Makro sicherlich anpassen. Falls du mit Option Explicit arbeitest, musst du die Variablen noch deklarieren.
Private Sub Stunden_je_Projekt()
Jahr = InputBox("Berechnung für welches Jahr?")
If Jahr = "" Then Exit Sub
ReDim m(13) '1=Jan
For i = 1 To 13
m(i) = DateSerial(Val(Jahr), i, 1)
Next i
lz = Range("d65336").End(xlUp).Row
ReDim P(0)
k = 0
For i = 2 To lz
If CStr(Year(Cells(i, 4))) = Jahr Then
For j = 1 To k
If P(j) = Cells(i, 2) Then Exit For
Next j
If j > k Then
k = k + 1
ReDim Preserve P(k)
P(k) = Cells(i, 2)
End If
End If
Next i
ReDim Ko(12, k)
For h = 2 To lz
a = Cells(h, 4)
For i = 1 To 12
If a > m(i) And a "" Then
z = z + 1
Cells(z, 7) = Str(P(h))
Cells(z, 8) = Ko(i, h)
End If
Next h
If j = z Then Cells(z, 7) = "keine Werte"
Next i
End Sub
Viel Erfolg
Holger
oracle schrieb am 04.03.2008 18:29:05:
HAllo Holger,
die Angaben zur Person sind erstmal unrelevant !
Die stehen in einer Excel Liste ! Brauche aber die unten genannte Problematik gelöst ? Bisher kam ich mit SELECT unter select's nicht weiter ?????????!!!!!!
Holger schrieb am 04.03.2008 10:52:13:
Hallo oracle,
wo führst du die Angaben zur Person?
Gruß
Holger
oracle schrieb am 03.03.2008 12:50:14:
Hallo,
ich möchte gerne die Stunden pro Monat und pro pos nr zu der pnr zuordnen !
Wie kann ich das am besten lösen ?
Ergebnis für ein ganzes Jahr !
Select sum(stunden),pnr, datum from tabelle where pnr like'6143' !
Wie bekomme ich die Stunden addiert jeweils für einen Monat pro Person und pro posnr ??????
TABELLE
pos pnr stunden datum
0 6143 8.25 2007-01-10
0 6143 4.50 2007-01-19
3 6143 6.75 2007-01-30
0 92064 7.15 2007-01-08
0 92064 10.35 2007-01-09
0 92064 6.00 2007-01-10
0 92064 8.00 2007-01-12
0 92064 7.25 2007-01-15
0 92064 9.75 2007-01-16
0 92064 9.25 2007-01-17
4 92064 7.50 2007-01-25
0 92064 8.25 2007-01-29
0 9616 8.25 2007-01-15
0 9616 8.25 2007-01-22
0 9616 8.75 2007-01-23
0 7722 7.75 2007-01-08
0 7722 8.15 2007-01-09
0 7722 8.40 2007-01-10
0 7722 7.50 2007-01-11
0 7722 7.40 2007-01-12
0 7722 7.60 2007-01-16
3 7722 9.00 2007-01-17
0 7722 9.50 2007-01-18
2 7722 8.80 2007-01-29
0 7722 8.50 2007-01-30
0 7722 9.20 2007-01-31
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
03.03.2008 12:50:14 |
oracle |
|
|
|
04.03.2008 10:52:13 |
Holger |
|
|
|
04.03.2008 18:29:05 |
oracle |
|
|
Aw:Aw:Aw:Summierung Stunden pro Monat ?????? |
05.03.2008 10:12:17 |
Holger |
|
|