- Stunden + Stunden per VBA einzeln berechnen
16.03.2004 11:04:09
Michael
ich habe folgendendes problem:
ich möchte aus einem dienstplan die überstunden und - stunden der mitarbeiter summiert einzeln darstellen. also alle - stunden addiert und alle + stunden addiert.
ich habe folgendes versucht:
Private Sub ueberstunden_click()
Dim spalte As Integer
Dim zeile As Integer
Dim minush As Integer
Dim plush As Integer
spalte = 36
minush = 0
plush = 0
For zeile = 8 To 73 Step 5
If Cells(zeile, spalte) < 0 Then
minush = minush + minush
End If
If Cells(zeile, spalte) > 0 Then
plush = plush + plush
End If
Next zeile
Cells(150, spalte) = minush
Cells(152, spalte) = plush
End Sub
leider war das ergebnis in beiden fällen 0:00
wer kann mir helfen.
gruß
michael