Thema Datum  Von Nutzer Rating
Antwort
26.07.2016 15:44:37 MaxGe
NotSolved
Blau Zellformatierung: Uhrzeit
 27.07.2016 00:00:03 Günther
Solved
27.07.2016 00:13:53 Günther
Solved
03.08.2016 14:14:46 MaxGe
NotSolved

Ansicht des Beitrags:
Von:
Günther		 Datum:
27.07.2016 00:00:03		 Views:
641		 Rating:
     
Antwort:
 Nein
Thema:
Zellformatierung: Uhrzeit

Moin,

wenn du die hundertstel Sekunden unterschlägst geht das so:

Function Num2Time(c As Range)
   Dim rc As Variant
   Dim h As Long, m As Long, s As Long, sp As Single
   rc = Right("0" & c, 8)
   h = Left(rc, 2)
   m = Mid(rc, 3, 2)
   s = Mid(rc, 5, 2)
   sp = Right(rc, 2)
   Num2Time = TimeSerial(h, m, s) + sp
End Function

Dann noch entsprechend formatieren.

Ihre Antwort
  • 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: Name: Email:



  • 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
26.07.2016 15:44:37 MaxGe
NotSolved
Blau Zellformatierung: Uhrzeit
 27.07.2016 00:00:03 Günther
Solved
27.07.2016 00:13:53 Günther
Solved
03.08.2016 14:14:46 MaxGe
NotSolved