|
Guten Morgen zusammen,
aus einer Datenbank kommen Arbeitszeiten in Dezimalform, sowie die berechneten Minuten:
Bsp: von 8,30 bis 9,00 = 42
Ich bin ein kompletter Noob und hab mir folgende Lösung aus dem Netz erschlossen.
Mit Hilfe eines Makros soll aus 8,30 = 8:18 Uhr; und aus 9,00 = 9:00 Uhr werden.
Es funktioniert zwar mit folgendem Code
(…)
Selection.Find.Execute "8,30", , , , , , True, wdFindContinue, , "8:18 Uhr", wdReplaceAll
Selection.Find.Execute "8,32", , , , , , True, wdFindContinue, , "8:19 Uhr", wdReplaceAll
(…)Am Stück war die Prozedur zu groß, also mussten mit Call (…) die Prozedur unterteilt werden.#
Der Coder funktioniert, allerdings recht langsam. Immer ca 5 Sekunden zu warten ist nicht das wahre.
Die Frage: Kann man den Code effektiver (neu-) machen, bzw den bestehenden beschleunigen? Gibt es da Methoden?
Beste Grüße
|