Brauche Hilfe in Excel

wbendl · 13.01.2005, 15:18

Hi!

Zum Thema Zeit umwandeln:

Ich habe eine Lösung wie von wizard beschrieben in 2 DB-Anwendungen verwendet. Alle Zeiten werden Sekunden umgerechnet. Das funktioniert tadellos.

Der Benutzer sieht für 1 Stunde 1:00, intern wird mit 3600 gearbeitet.

Ich weiß nicht, ob das in Excel mit Formeln möglich ist.
Eine VBA-Funktion kann das auf jeden Fall. Das erspart auch die Hilfsspalten und ist leichter zu handhaben.

Das Beispiel erwartet die Zeit im Format "hh:mm", und gibt Sekunden zurück.

Function ZeitAlsZahl(ByVal strZeit As String) As Long
ZeitAlsZahl = Left(strZeit, 2) * 60 + Right(strZeit, 2)
End Function

Und wenn du schon dabei bist, kannst du auch die Formeln mit =WENN durch VBA-Code ersetzen. Das ist übersichtlicher.

mfg

WB

13.01.2005, 15:18	#9
wbendl Master Registriert seit: 22.03.2000 Alter: 66 Beiträge: 550	Hi! Zum Thema Zeit umwandeln: Ich habe eine Lösung wie von wizard beschrieben in 2 DB-Anwendungen verwendet. Alle Zeiten werden Sekunden umgerechnet. Das funktioniert tadellos. Der Benutzer sieht für 1 Stunde 1:00, intern wird mit 3600 gearbeitet. Ich weiß nicht, ob das in Excel mit Formeln möglich ist. Eine VBA-Funktion kann das auf jeden Fall. Das erspart auch die Hilfsspalten und ist leichter zu handhaben. Das Beispiel erwartet die Zeit im Format "hh:mm", und gibt Sekunden zurück. Function ZeitAlsZahl(ByVal strZeit As String) As Long ZeitAlsZahl = Left(strZeit, 2) * 60 + Right(strZeit, 2) End Function Und wenn du schon dabei bist, kannst du auch die Formeln mit =WENN durch VBA-Code ersetzen. Das ist übersichtlicher. mfg WB

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)