Sekunden in Std. Min. Sek. umrechnen

    Hallo Leute habe folgendes Problem bei VBDN4C ich soll 90999 sekunden in Stunden, Minuten,Sekunden umrechnen bei meinem Code kommt aber 25Std.39Min 0Sek herraus.
    Es müssen aber 25 Std. 16 Min. 39Sek rauskommen.

    Weiß jetzt nicht ob ich hier meinen Code Posten darf.
    Wäre aber für jede hilfe/Tipps dankbar
    MFG Bettie

    Also ich habe gerade kein VB zur Hand, aber VBA mit Excel bringt das gleiche Ergebnis:

    Private Sub CommandButton1_Click()
    Dim Sekunden As Double
    Dim Minuten As Double
    Dim Stunden As Double
    Dim Tage As Double

    'Übergabe der Sekunden von 90999
    Sekunden = Range("A2")

    'Berechnung
    Minuten = Fix(Sekunden / 60)
    Sekunden = Sekunden - (Minuten * 60)
    Stunden = Fix(Minuten / 60)
    Minuten = Minuten - (Stunden * 60)

    'Übergabe an Zelle in Excel
    'std, min, sec, sind Zellbezeichnungen
    Range("std") = Stunden
    Range("min") = Minuten
    Range("sec") = Sekunden
    End Sub

    Ergebnis: [ATTACH=CONFIG]1025[/ATTACH]

    Gruß
    hape