15 Minuten Countdown in Powerpoint
- Themenstarter gavanaa
- Beginndatum
der leidige Countdown
Hallo, Zusammen!
thekorn das hast du schon super hingekriegt.
Bin auch schon die ganze Zeit am suchen, um so einen Countdown in Powerpoint bis zum Jahresende hinzukriegen. In Excel habe ich mit Hilfe Herbers Excelseiten so lange rumprobiert, bis es zumindestens mit benutzerdefinierter Ansicht geklappt hat.
Theoretisch müsste das Makro auch auf das Jahresende veränderbar sein?
Leider habe ich null Ahnung von VBA. Warum muss das "EventClassModule" jedesmal manuell initialisiert werden?
Wär schön, wenn Du mir helfen könntest.
In der Anlage, wie das in Excel aussieht. Vielleicht kann es der eine oder andere ja gebrauchen.
Grüße
MJae
Hallo, Zusammen!
thekorn das hast du schon super hingekriegt.
Bin auch schon die ganze Zeit am suchen, um so einen Countdown in Powerpoint bis zum Jahresende hinzukriegen. In Excel habe ich mit Hilfe Herbers Excelseiten so lange rumprobiert, bis es zumindestens mit benutzerdefinierter Ansicht geklappt hat.
Theoretisch müsste das Makro auch auf das Jahresende veränderbar sein?
Leider habe ich null Ahnung von VBA. Warum muss das "EventClassModule" jedesmal manuell initialisiert werden?
Wär schön, wenn Du mir helfen könntest.
In der Anlage, wie das in Excel aussieht. Vielleicht kann es der eine oder andere ja gebrauchen.
Grüße
MJae
Zuletzt bearbeitet:
thekorn
Erfahrenes Mitglied
Versuch...
Habe den Code für die Prozedur "zeit()" mal entsprechend geändert, läuft jetzt im Rahmen der Rundungsgenauigkeit
Wer das ausprobiert wird sehr schnell merken, dass es aufgrund von rundungsfehlern zu abweichungen mit dem Excelcode kommt. Mann muss sich hier vielleicht noch ein paar gedanken machen!
gruß
thekorn
Habe den Code für die Prozedur "zeit()" mal entsprechend geändert, läuft jetzt im Rahmen der Rundungsgenauigkeit
Code:
Public Sub zeit()
Dim laenge, Start, Ende, Tformat, Tage, Diff_Zeit, Stunden, Minuten, Sekunden
Set firstSl = Application.ActivePresentation.SlideMaster
'Tformat = "hh:mm:ss"
Datum1 = DateValue("31.12.2004")
laenge = DateDiff("s", Now, Datum1)
'laenge = 15 * 60 ' Dauer in Sekunden festlegen.
Start = Timer ' Anfangszeit setzen.
Ende = Start + laenge
'MsgBox ((Ende - Timer) / 86400 & " und " & Timer)
Do While (Timer < Ende) And (pre_stop = False)
'firstSl.Shapes(1).TextFrame.TextRange.Text = Format((Ende - Timer) / (24 * 60), Tformat)
Diff_Zeit = (Ende - Timer)
Tage = Format(Diff_Zeit / 86400, "0")
Stunden = Format(Tage - (Diff_Zeit / 86400), "hh")
Minuten = Format(Stunden - Tage - (Diff_Zeit / 86400), "mm")
Sekunden = Format(Minuten - Stunden - Tage - (Diff_Zeit / 86400), "ss")
firstSl.Shapes(1).TextFrame.TextRange.Text = Tage & " Tage, " & Stunden & " Stunden, " & Minuten & " Minuten, " & Sekunden & " Sekunden"
DoEvents ' Steuerung an andere Prozesse
' abgeben.
Loop
firstSl.Shapes(1).TextFrame.TextRange.Text = Format(0, Tformat) 'hier steht das, was am ende stehenbleiben soll!
Set firstSl = Nothing
End SubWer das ausprobiert wird sehr schnell merken, dass es aufgrund von rundungsfehlern zu abweichungen mit dem Excelcode kommt. Mann muss sich hier vielleicht noch ein paar gedanken machen!
gruß
thekorn
Salahaddin
Grünschnabel
Hi.
Wie kann man diese Countdown zu einer anderen Stelle verschieben,weil es in der Mitte der Seite steht und sieht so nicht gut aus.Ich hab's versucht,aber bei mir geht nicht.
Danke.
Salahaddin.
Wie kann man diese Countdown zu einer anderen Stelle verschieben,weil es in der Mitte der Seite steht und sieht so nicht gut aus.Ich hab's versucht,aber bei mir geht nicht.
Danke.
Salahaddin.
M
MoD1979
Hallo zusammen. Auch mir geht es nicht anders. Ich suche für eine Präsentation einen Countdown-Timer wo man ein bestimmtes Datum eingeben kann und er rückwärts vom heutigem Datum an zählt. Ich weiß, dass es geht. Nur nicht mehr wie. Ein Script oder auch ein html code habe ich bereits. Nur das einbinden klappt irgendwie nicht. Hab schon alle möglichen Einstellungen die hier erwähnt worden sind ausprobiert. Nur der Timer wird nicht sichtbar. Wer kann helfen? Wäre grandiös....
Hier der Quelltext:
<html>
<head>
<title>Ein Countdown mit JavaScript</title>
<meta name="robots" content="noindex,nofollow">
<style type="text/css">body{background-color:#000000};input {background-color:#FF3333;border-width:1};p{font-size:75%}</style>
<script language="JavaScript">
var jahr=2008, monat=6, tag=7, stunde=18, minute=00, sekunde=00; // Ziel-Datum in MEZ
var zielDatum=new Date(jahr,monat-1,tag,stunde,minute,sekunde);
function countdown() {
startDatum=new Date(); // Aktuelles Datum
// Countdown berechnen und anzeigen, bis Ziel-Datum erreicht ist
if(startDatum<zielDatum) {
var jahre=0, monate=0, tage=0, stunden=0, minuten=0, sekunden=0;
// Jahre
while(startDatum<zielDatum) {
jahre++;
startDatum.setFullYear(startDatum.getFullYear()+1);
}
startDatum.setFullYear(startDatum.getFullYear()-1);
jahre--;
// Monate
while(startDatum<zielDatum) {
monate++;
startDatum.setMonth(startDatum.getMonth()+1);
}
startDatum.setMonth(startDatum.getMonth()-1);
monate--;
// Tage
while(startDatum.getTime()+(24*60*60*1000)<zielDatum) {
tage++;
startDatum.setTime(startDatum.getTime()+(24*60*60*1000));
}
// Stunden
stunden=Math.floor((zielDatum-startDatum)/(60*60*1000));
startDatum.setTime(startDatum.getTime()+stunden*60*60*1000);
// Minuten
minuten=Math.floor((zielDatum-startDatum)/(60*1000));
startDatum.setTime(startDatum.getTime()+minuten*60*1000);
// Sekunden
sekunden=Math.floor((zielDatum-startDatum)/1000);
// Anzeige formatieren
(jahre!=1)?jahre=jahre+" Jahre, ":jahre=jahre+" Jahr, ";
(monate!=1)?monate=monate+" Monate, ":monate=monate+" Monat, ";
(tage!=1)?tage=tage+" Tage, ":tage=tage+" Tag, ";
(stunden!=1)?stunden=stunden+" Stunden, ":stunden=stunden+" Stunde, ";
(minuten!=1)?minuten=minuten+" Minuten und ":minuten=minuten+" Minute und ";
if(sekunden<10) sekunden="0"+sekunden;
(sekunden!=1)?sekunden=sekunden+" Sekunden":sekunden=sekunden+" Sekunde";
document.countdownform.countdowninput.value=jahre+monate+tage+stunden+minuten+sekunden;
setTimeout('countdown()',200);
}
// Anderenfalls alles auf Null setzen
else document.countdownform.countdowninput.value=" 0 Jahre, 0 Monate, 0 Tage, 0 Stunden, 0 Minuten und 00 Sekunden";
}
</script>
</head>
<body scroll="auto" onload="countdown()">
<br>
<form name="countdownform"><p><input size="75" name="countdowninput" style="background-color:#ffffff;border-width:0" onfocus="if(this.blur)this.blur()"></p></form>
</body>
<html>
Internette Grüße MoD1979
Hier der Quelltext:
<html>
<head>
<title>Ein Countdown mit JavaScript</title>
<meta name="robots" content="noindex,nofollow">
<style type="text/css">body{background-color:#000000};input {background-color:#FF3333;border-width:1};p{font-size:75%}</style>
<script language="JavaScript">
var jahr=2008, monat=6, tag=7, stunde=18, minute=00, sekunde=00; // Ziel-Datum in MEZ
var zielDatum=new Date(jahr,monat-1,tag,stunde,minute,sekunde);
function countdown() {
startDatum=new Date(); // Aktuelles Datum
// Countdown berechnen und anzeigen, bis Ziel-Datum erreicht ist
if(startDatum<zielDatum) {
var jahre=0, monate=0, tage=0, stunden=0, minuten=0, sekunden=0;
// Jahre
while(startDatum<zielDatum) {
jahre++;
startDatum.setFullYear(startDatum.getFullYear()+1);
}
startDatum.setFullYear(startDatum.getFullYear()-1);
jahre--;
// Monate
while(startDatum<zielDatum) {
monate++;
startDatum.setMonth(startDatum.getMonth()+1);
}
startDatum.setMonth(startDatum.getMonth()-1);
monate--;
// Tage
while(startDatum.getTime()+(24*60*60*1000)<zielDatum) {
tage++;
startDatum.setTime(startDatum.getTime()+(24*60*60*1000));
}
// Stunden
stunden=Math.floor((zielDatum-startDatum)/(60*60*1000));
startDatum.setTime(startDatum.getTime()+stunden*60*60*1000);
// Minuten
minuten=Math.floor((zielDatum-startDatum)/(60*1000));
startDatum.setTime(startDatum.getTime()+minuten*60*1000);
// Sekunden
sekunden=Math.floor((zielDatum-startDatum)/1000);
// Anzeige formatieren
(jahre!=1)?jahre=jahre+" Jahre, ":jahre=jahre+" Jahr, ";
(monate!=1)?monate=monate+" Monate, ":monate=monate+" Monat, ";
(tage!=1)?tage=tage+" Tage, ":tage=tage+" Tag, ";
(stunden!=1)?stunden=stunden+" Stunden, ":stunden=stunden+" Stunde, ";
(minuten!=1)?minuten=minuten+" Minuten und ":minuten=minuten+" Minute und ";
if(sekunden<10) sekunden="0"+sekunden;
(sekunden!=1)?sekunden=sekunden+" Sekunden":sekunden=sekunden+" Sekunde";
document.countdownform.countdowninput.value=jahre+monate+tage+stunden+minuten+sekunden;
setTimeout('countdown()',200);
}
// Anderenfalls alles auf Null setzen
else document.countdownform.countdowninput.value=" 0 Jahre, 0 Monate, 0 Tage, 0 Stunden, 0 Minuten und 00 Sekunden";
}
</script>
</head>
<body scroll="auto" onload="countdown()">
<br>
<form name="countdownform"><p><input size="75" name="countdowninput" style="background-color:#ffffff;border-width:0" onfocus="if(this.blur)this.blur()"></p></form>
</body>
<html>
Internette Grüße MoD1979
Zuletzt bearbeitet von einem Moderator:
G
Gast
Hi,
ich glaube, dass Du auf http://www.powerpoint-timer.com genau das findest, wonach Du suchst.
Natürlich sind neben den von Dir genannten 15 min auch noch viele andere Redezeiten einstellbar.
Einfach mal ausprobieren.
Viel Spaß.
ich glaube, dass Du auf http://www.powerpoint-timer.com genau das findest, wonach Du suchst.
Natürlich sind neben den von Dir genannten 15 min auch noch viele andere Redezeiten einstellbar.
Einfach mal ausprobieren.
Viel Spaß.
T
TimeForTalk
Hallo,
da gibt es ganz hilfreiche Tools, die Du Dir im Netz downloaden kannst. Ein sehr schöner Powerpoint Timer ist der auf http://www.powerpoint-timer.com, schau ihn Dir mal an, ich denke, das ist genau das, wonach Du suchst?
Beste Grüße
Eckhard.
da gibt es ganz hilfreiche Tools, die Du Dir im Netz downloaden kannst. Ein sehr schöner Powerpoint Timer ist der auf http://www.powerpoint-timer.com, schau ihn Dir mal an, ich denke, das ist genau das, wonach Du suchst?
Beste Grüße
Eckhard.
N
neolight
Hallo,
warum kann ich keine Zeit einstellen, die länger als 24 Min. ist? Gebe ich z.B. 30 * 60 ein, beginnt der Countdown bei 6:00 Min.
Was nun?
warum kann ich keine Zeit einstellen, die länger als 24 Min. ist? Gebe ich z.B. 30 * 60 ein, beginnt der Countdown bei 6:00 Min.
Was nun?
