| |
Visual-Basic EinsteigerRechnen mit Datum und Uhrzeit | | | Autor: V A T | Datum: 23.07.17 22:34 |
| Hallo,
mir raucht der Kopf! Irgendwie stehe ich mit dieser kombinierten Datums-/Uhrzeitberechnerei in VBA auf Kriegsfuss! Vielleicht kann mich jemand von Euch auf den rechten Weg bringen...
Die Ausgangslage:
- Ich habe eine Excel-Tabelle mit VBA-Code geschrieben.
- Im Code habe ich eine Textbox, in der ein Startdatum mit Uhrzeit steht (z.B. "24.12.2002 15:34").
- In der Excel-Tabelle habe ich eine Zelle, in der ein Wert steht (z.B. "2").
- jetzt möchte ich zwei Dinge tun, wobei ich schon am ersten scheitere:
1. Über eine Funktion, in der ich die beiden Werte mitgebe, die Summe errechnen (ich kenne Dateadd(), aber irgendwie bekomme ich die Werte da nicht im richtigen Format rein.
2. Die Funktion so anpassen, dass Zeiten, welche an Wochentagen zwischen 18:00 abends und 8:00 morgens und die beiden Wochenendtage nicht mitaddiert werden. Beispiel ("21.07.2017 17:00" + "2h" = "24.07.2017 9:00", weil am Freitag nur noch die verbleibende Stunde bis 18:00 Uhr zählt, das Wochenende gar nicht zählt und am Montag erst ab 8:00 Uhr gezählt wird)
Gibt es irgendjemandem, der mir hier helfen/einen Tipp geben kann?! Vorab vielen Dank an alle, die mich hier unterstützen. Ich weiß das ernsthaft zu schätzen!!!
Gruß
V A T
Aufruf im Code:
textfeld2.text=SLA_Servicezeit(range"A1".value, textfeld1.text) Funktion im Modul:
Function SLA_Servicezeit(Wert As Long, Startdatum As Date) As Date
A_Ende = Beginn + SLA
SLA_Servicezeit = A_Ende
End Function Vielen Dank an alle in diesem Forum, welche mir Ihre Zeit schenken und sich mit meinen Problemen befassen! Ich weiß das ernsthaft zu schätzen und danke allen, die sich mit dieser Frage befassen herzlich!!! | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
Neu! sevCommand 4.0
Professionelle Schaltflächen im modernen Design!
Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek. Weitere InfosTipp des Monats März 2024 Dieter OtterUTF-8 Konvertierung von Dateien und StringsVB6 selbst verfügt über keine Funktionen zur UTF-8 Konvertierung von Daten. Mit Hilfe des ADODB.Stream-Objekts lassen sich diese fehlenden Funktionen aber schnell nachrüsten. Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|