Live Uhrzeit in Präsentation
Moderator: Moderatoren
Live Uhrzeit in Präsentation
Hallo,
versuche schon seit einiger Zeit eine LIVE Uhrzeit in eine Impress Präsentation zu erstellen. Habe bis jetzt nur den Ansatz mit ->Einfügen->Feldbefehl->Uhrzeit(variable) gefunden jedoch wird dei Uhrzeit nicht ständig aktualisiert.
Hat jemand eine Idee wie man die aktuelle Uhrzeit in der Präsentation Ansatzweise realisieren könnte? Eventuell mit Makros?
Danke
versuche schon seit einiger Zeit eine LIVE Uhrzeit in eine Impress Präsentation zu erstellen. Habe bis jetzt nur den Ansatz mit ->Einfügen->Feldbefehl->Uhrzeit(variable) gefunden jedoch wird dei Uhrzeit nicht ständig aktualisiert.
Hat jemand eine Idee wie man die aktuelle Uhrzeit in der Präsentation Ansatzweise realisieren könnte? Eventuell mit Makros?
Danke
Hey Hoelli86,

Geht aber wohl nur mit Makros. Hier ein kleines Beispiel:
Damit es funktioniert, rufst du die Masterpage der ersten Seite auf, plazierst dort eine Autoform (ich habe ein Rechteck genommen - es spielt aber grundsatzlich keine rolle) und benennst dieses Objekt (Kontextmenü - Objekt benennen) - und zwar mit "Feld1". Schreib etwas in das Feld hinein, damit du acuh die Schrift formatieren kannst, was ist egal, wird sowieso überschrieben.
Das Makro macht nun folgendes: Es holt sich die Masterseite der ersten Folie, sucht dort nach einem Element mit Namen "Feld1" und schreibt dort dann die aktuelle Systemzeit rein. Dann wartet es 990 millisekunden und startet die Schleife erneut. Damit sie nicht endlos läuft, hab ich sie mal auf 50 Durchgänge begrenzt (n=50), also 50 Sekunden. Kannst du natürlich entsprechend "aufmotzen" oder auch mit Listener ausrüsten....
Eventuell musst du mit der Wait-Zeit ein wenig spielen, ja nachdem, das wievielte Objekt dein gesuchtes ist. Theoretisch könntest du die Wait-Zeit auch ganz weglassen - dann wird halt immer das passende Datum eingetragen - bis zu 1000 * pro Sekunde. Möglicherweise aber "hängt" dann dein PC.
So, das Makro könntest du mit Öffnen der Präsentation starten - dann läuft die Uhr
Viele Grüße
Thomas
SicherHat jemand eine Idee wie man die aktuelle Uhrzeit in der Präsentation Ansatzweise realisieren könnte? Eventuell mit Makros?

Geht aber wohl nur mit Makros. Hier ein kleines Beispiel:
Code: Alles auswählen
Sub Zeit_Anzeige
oDrawPage = ThisComponent.getDrawPages(0)
oMaster = oDrawPage.getByIndex(0).getMasterPage()'.getByIndex(0) 'Name("Feld1")
n= 1
do while n < 50
for i = 0 to oMaster.count - 1
if oMaster.getByIndex(i).name = "Feld1" then
oShape = oMaster.getByIndex(i)
oShape.string = time()
exit for
end if
next
wait(990)
n = n + 1
loop
End Sub
Das Makro macht nun folgendes: Es holt sich die Masterseite der ersten Folie, sucht dort nach einem Element mit Namen "Feld1" und schreibt dort dann die aktuelle Systemzeit rein. Dann wartet es 990 millisekunden und startet die Schleife erneut. Damit sie nicht endlos läuft, hab ich sie mal auf 50 Durchgänge begrenzt (n=50), also 50 Sekunden. Kannst du natürlich entsprechend "aufmotzen" oder auch mit Listener ausrüsten....
Eventuell musst du mit der Wait-Zeit ein wenig spielen, ja nachdem, das wievielte Objekt dein gesuchtes ist. Theoretisch könntest du die Wait-Zeit auch ganz weglassen - dann wird halt immer das passende Datum eingetragen - bis zu 1000 * pro Sekunde. Möglicherweise aber "hängt" dann dein PC.
So, das Makro könntest du mit Öffnen der Präsentation starten - dann läuft die Uhr

Viele Grüße
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Hey,
sorry, muss eine Korrektur anbringen: Es funktioniert offensichtlich nur im "normalen" Modus, nicht im Präsentationsmodus.
Dort ändert sich nix????
Entweder gibt es da einen Bug - oder ... zur Zeit keine Ahnung
Gruss
Thomas
sorry, muss eine Korrektur anbringen: Es funktioniert offensichtlich nur im "normalen" Modus, nicht im Präsentationsmodus.
Dort ändert sich nix????
Entweder gibt es da einen Bug - oder ... zur Zeit keine Ahnung

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Hey,
hab noch ein bischen gestöbert... Geht derzeit wirklich nicht. Ist als Problem bekannt, wird jedoch jetzt auch nicht bearbeitet.
Der bestehende Issue ( 48395 ) wurde gerade geschlossen
Gruss
Thomas
hab noch ein bischen gestöbert... Geht derzeit wirklich nicht. Ist als Problem bekannt, wird jedoch jetzt auch nicht bearbeitet.
Der bestehende Issue ( 48395 ) wurde gerade geschlossen

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Offensichtlich, so sagt es zumindest der Issue. Hab ich aber nicht getestetWürde das aber mit der Version 1.1 noch funktionieren oder?
Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic