Anzeige
Archiv - Navigation
344to348
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
344to348
344to348
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dauer Errechnung

Dauer Errechnung
03.12.2003 12:05:20
Susanne
Hallo,

Ich habe da ein Problem:
Ich möchte verschiedene Stundenangaben wie "352:45:32" und weitere zusammenrechnen und dann als Gesamtdauer in ein Feld schreiben.
Mein Problem ist nun, das die Angaben das Format String haben und ich es als Date brauche um damit weiter rechnen zu können. Da es aber im grunde keine richtige Uhrzeit ist, sonderen eine Stundenangabe, klappt das mit der CDate Funktion nicht.

Bin für jede Hilfe dankbar

Grüße
Susanne

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dauer Errechnung
03.12.2003 13:05:43
Harald Kapp
Hallo Susanne,
etwa so:


Sub test()
Dim stunden, minuten, sekunden As Integer
Dim strzeit As String
strzeit = Cells(1, 1)
stunden = Left(strzeit, InStr(1, strzeit, ":") - 1)
strzeit = Right(strzeit, Len(strzeit) - InStr(strzeit, ":"))
minuten = Left(strzeit, InStr(1, strzeit, ":") - 1)
strzeit = Right(strzeit, Len(strzeit) - InStr(strzeit, ":"))
sekunden = strzeit
MsgBox stunden & ":" & minuten & ":" & sekunden
End Sub


Gruß Harald

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige