peter59
Terugkerende gebruiker
- Lid geworden
- 21 mei 2007
- Berichten
- 2.450
- Besturingssysteem
- Windows 11
- Office versie
- Office 365
Hallo,
Ik ben aan het stoeien geraakt met een code van sylvester-ponte
Deze is in topic http://www.helpmij.nl/forum/showthread.php/901871-negatieve-en-positieve-tijden-bij-elkaar-optellen-in-excel?highlight=negatieve+tijden gebruikt.
Het e.e.a. in de code aangepast in het voorbeeldje van TS "wateenpech" en het werkt perfect.
Maar zet ik deze code in mijn eigen bestand dan gaat het mis. Zie bijlage.
Ik krijg helaas de code niet vertaald om het e.e.a. in mijn bestandje aan te passen.
Mvg
Peter
Ik ben aan het stoeien geraakt met een code van sylvester-ponte
Deze is in topic http://www.helpmij.nl/forum/showthread.php/901871-negatieve-en-positieve-tijden-bij-elkaar-optellen-in-excel?highlight=negatieve+tijden gebruikt.
Het e.e.a. in de code aangepast in het voorbeeldje van TS "wateenpech" en het werkt perfect.
Maar zet ik deze code in mijn eigen bestand dan gaat het mis. Zie bijlage.
Ik krijg helaas de code niet vertaald om het e.e.a. in mijn bestandje aan te passen.
Code:
Function rareTijdSom(R As Range)
For Each t In R
t1 = Fix(t)
t2 = t - t1
tt = tt + t1 + t2 / 0.6
Next
t1 = Fix(tt)
t2 = tt - t1
rareTijdSom = t1 + t2 * 0.6
End Function
Peter