Thema Datum  Von Nutzer Rating
Antwort
Rot Uhrzeit in Double konvertieren
28.08.2019 16:12:10 Oskar
NotSolved
28.08.2019 16:28:33 Gast54599
NotSolved
28.08.2019 18:07:48 RPP63
NotSolved
28.08.2019 19:40:57 Gast15703
*****
Solved
02.09.2019 09:06:53 Oskar
NotSolved

Ansicht des Beitrags:
Von:
Oskar
Datum:
28.08.2019 16:12:10
Views:
64
Rating: Antwort:
  Ja
Thema:
Uhrzeit in Double konvertieren

Hallo Zusammen,

 

einfaches Problem, aber ich steh voll auf dem Schlauch.

Ich habe in Zellen mit den Eingangswerten Uhrzeiten drin. Diese lese ich aus. Dann verändere ich sie (-1 Minuten) und füge sie an gleicher Stelle wieder ein. Die Zellen sind im Fomat hh:mm;@. 

Es funktioniert, wenn in der Zelle ein Wert steht wie z.B. 12:00:00 (sichtbar ist nur 12:00). Dann liest das Programm richtigerweise den Wert (0.5). Wenn allerdings in einer Zelle nur 12:00 (ohne :00) steht erscheint "Datentypen unverträglich". Wie kann ich meine 12:00 als Double einlesen? Ich möchte vermeiden, jeder Zelle (sehr viele!) in denen das der Fall ist, manuell :00 hinzuzufügen. :D

Sub Zeitversatz()
 
Dim c As Range
Dim v As Double
 
For Each c In Selection
    v = c.Value
    ' -1 Minute
    c.Value = v - 6.94444444444444E-04
    
Next
 
End Sub
 
 
Viele Grüße
 
Oskar

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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 markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Uhrzeit in Double konvertieren
28.08.2019 16:12:10 Oskar
NotSolved
28.08.2019 16:28:33 Gast54599
NotSolved
28.08.2019 18:07:48 RPP63
NotSolved
28.08.2019 19:40:57 Gast15703
*****
Solved
02.09.2019 09:06:53 Oskar
NotSolved