Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1472to1476
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1472to1476
1472to1476
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeitstempel auf 10 Minutenwert aufrunden

Zeitstempel auf 10 Minutenwert aufrunden
02.02.2016 18:27:06
Karsten
Hallo liebe Excel Freunde, ich möchte gern einen sekunden genauen Zeitstempel
auf den nächsten vollen 10 Minutenwert "aufrunden", nämlich so:
Beispiel:
Orginal: 12.01.2015 07:33:25
neu: 12.01.2015 07:40:00
wie mache ich das in VBA? ich habe den Zeitstempel über die Variable "AlarmTimeOn" schon ausgelesen. Mit runden funktioniert das leider nicht.
Wenn Ihr eine Lösung habt ware das super ;-)
Gruß Karsten

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeitstempel auf 10 Minutenwert aufrunden
02.02.2016 18:57:56
Daniel
Hi
geht schon mit Runden.
du musst nur vor dem Runden deinen Wert mit einem Faktor mulitplizieren, so dass dein Rundungwert (10 min) dem Wert 1 entspricht und hinterher wieder durch diesen Faktor teilen (oder erst teilen und dann multiplizeren).
Faktor = CDbl(TimeSerial(0, 10, 0))
AlarmTimeOn = -Int(-AlarmTimeOn / Faktor) * Faktor
bei neueren Excelversionen unter Nutzung der Excelformeln auch so: 
Faktor = TimeSerial(0, 10, 0)
AlarmTimeOn = WorksheetFunction.Ceiling(AlarmTimeOn, Faktor)

Gruß Daniel

Anzeige
AW: Zeitstempel auf 10 Minutenwert aufrunden
02.02.2016 19:31:20
Karsten
Super Danke Daniell, es funtioniert!!! Wie kann man dann noch abrunden?

AW: Zeitstempel auf 10 Minutenwert aufrunden
02.02.2016 19:49:35
Daniel
Hi
für die erste Variante: einfach die beiden "-" weglassen
bei der zweiten Variante: verwende anstelle von CEILING(Obergrenze) die Funktionen FLOOR(Untergrenze) fürs Abrunden und MROUND(VRunden) fürs normale Runden.
normales Runden nach der ersten Variante geht dann so:
=Round(AlarmTimeOn / Faktor, 0) * Faktor
Gruß Daniel

AW: Zeitstempel auf 10 Minutenwert aufrunden
02.02.2016 19:59:26
Karsten
Super danke! Du hast mir sehr geholfen!!!! Schönen Abend noch!

314 Forumthreads zu ähnlichen Themen

Zellen- Inhalt auf Zahl 0 zurücksetzen
Lemmi

Hallo zusammen,
ich habe eine Arbeitsliste in der durch eine Drop- Down Menü Auswahl 0,1,2,3 sowie Leerstelle- Auswahl durchgeführt wird. (ab Spalte M6)
In der Spalte ab O6 wird eine Bewertung Durchgeführt. Diese wird auch durch Drop- Down umgesetzt!
Wird nun in der Spalte O di...
02.09.2008 17:35:00
Thread-ID: 1006885
12 Beiträge
Anzeige
Zellen füllen, ohne Formel zu überschreiben
m-andi

Hallo zusammen,
Folgendes Problem, ich möchte über ein Seperates Feld über die vorgaben "tags, nachts, immer" felder mit Ja oder nein füllen, hier sollen quasi immer profile eingesetzt werde, sprich nachts ist z.B. das ein "ja" von 22-5Uhr ist, der rest dann ein "nein".
Nun kann ich dem...
14.11.2008 09:23:00
Thread-ID: 1024423
4 Beiträge
Laufzeitfehler 1004 bei Formeleinfügen in Zelle
Werner

bei folgender Formel
ActiveCell.FormulaR1C1 = "=RC[-2]*100/RC[-1]"
erhalte ich Laufzeitfehler 1004. Woran kann es liegen?
Gruß Werner.
26.11.2008 14:31:29
Thread-ID: 1028037
7 Beiträge
Anzeige
Zahlen ohne Formeln !!
Wacker

Hallo,
ich habe diverse Berechnungen durchgeführt.
Ich benötige aber nur noch die Zahlen aus den Ergebniss, aber nicht die Formeln.
Wie kann ich die Zahlen die durch Formeln berechnet wurden nun als Feste Zahlen übernehmen.
Ich hoffe ich habe es richtig erklärt?
Vielen Dank!...
24.01.2009 09:41:17
Thread-ID: 1043269
4 Beiträge
Zahlen ohne Formeln !!
Wacker

Hallo,
ich habe diverse Berechnungen durchgeführt.
Ich benötige aber nur noch die Zahlen aus den Ergebniss, aber nicht die Formeln.
Wie kann ich die Zahlen die durch Formeln berechnet wurden nun als Feste Zahlen übernehmen.
Ich hoffe ich habe es richtig erklärt?
Vielen Dank!...
24.01.2009 09:41:23
Thread-ID: 1043270
5 Beiträge
Zeit auf 5 Minuten runden?
Hermann

Hallo Excel-ianer,
wie kann ich eine eingegebene Uhrzeit auf volle 5 Minuten runden?
Also 7:01 bis 7:02 auf 7:00 Uhr
und 7:03 bis 7:07 auf 7:05 Uhr
Meine selbstgebastelte Formel ist etwas länglich geraten.
In A2 stehe die Zeit, z.B. 07:03:00 ,
und die Formel soll dann...
16.02.2009 15:23:00
Thread-ID: 1051172
4 Beiträge
auf volle Euro aufrunden
Bernd

Hallo liebe Helferlein,
ich habe in der Recherche leider nichts gefunden.
Ich benötige eine Formel, die immer auf den nächst vollen Euro aufrundet.
aus z.B. 1.860,48 wird 1.861,00
vielen lieben Dank für Eure Hilfe
Gruss Bernd
23.02.2009 10:41:15
Thread-ID: 1052992
2 Beiträge
Laufzeitfehler 1004 Range für Objekt Global fehl..
Mette

Hallo zusammen,
ich erhalte die Fehlermeldung 1004 "Die Methode 'Range' für das Objekt '_Global' ist fehlgeschlagen".
Kann damit schier nichts anfangen. Mit folgendem Code sollen in Zeile 1 die Spalten 1 bis 3, 4 bis 6 und 7 bis 9 verbunden werden:
Sub neu() Zeile = 1 For Spalte =...
23.03.2009 15:05:04
Thread-ID: 1062922
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
11
5
3
6
3
3
4
3
1
2
1
1
8
2
5
2
2
1
4
3
2
1
2
10
2