Benutzer:Paul Sutermeister/Präsentation

Death by PowerPoint fand im Jahr

in Florida statt.

Dabei verloren

Menschen ihr Leben.

Grund war eine PowerPoint-

.

Eine gute Präsentation geht auch ohne

Mit dem papiernen

visualisiert man Gesprochenes simultan.

PowerPoint soll sparsam verwendet werden.

Zum Beispiel zeigt die Vortragstechnik

20 Bilder jeweils 20 Sekunden.

Die Präsentation dauert so nur

Minuten und

Sekunden.

Gezeigt werden nur

, kein Text.

Prompt	Makro	Entwicklertools	VBA
				„Schreibe mir ein Makro für PowerPoint mit 5 Folien zum Thema: Wie … ?“
				Sub ErstellePowerPointMitChatGPT()
				Datei → Optionen → Menüband anpassen → Hauptregisterkarten →
				Programmiersprache von Microsoft Office-Programmen

KI-Chatbot öffnen

Prompt eingeben

Makro kopieren

PowerPoint öffnen

Entwicklertools auswählen

Visual Basic öffnen

Modul einfügen

Makro einfügen

Sub/UserForm ausführen

Präsentation anpassen

5 Erstellt folgendes Makro eine Pecha-Kucha-konforme Präsentation?

Sub ErstellePechaKuchaFolie()
   Dim slideIndex As Integer
   Dim newSlide As slide
   
   'Füge eine neue Folie hinzu
   Set newSlide = ActivePresentation.Slides.Add(1, ppLayoutText)
   
   'Aktualisiere den Folienindex
   slideIndex = 1
   
   'Setze den Titel der Folie
   newSlide.Shapes(1).TextFrame.TextRange.Text = "Wie mache ich ein Pecha Kucha?"
   
   'Füge Text zum Inhalt der Folie hinzu
   newSlide.Shapes(2).TextFrame.TextRange.Text = "1. Sammle 20 Bilder oder Diagramme." & vbCrLf & _
       "2. Gestalte mit jedem Bild/Diagramm eine Folie." & vbCrLf & _
       "3. Wähle Übergänge nach 20 Sekunden." & vbCrLf & _
       "4. Verwende nur wenige Worte pro Folie." & vbCrLf & _
       "5. Füge zu jeder Folie Notizen hinzu." & vbCrLf & _
       "6. Achte beim Üben auf das Zeitlimit."
       
   'Zentriere den Text
   newSlide.Shapes(2).TextFrame.TextRange.ParagraphFormat.Alignment = ppAlignCenter
   
   'Aktiviere die Folie
   newSlide.Select
End Sub

	Ja
	Nein

	Die Präsentationsdatei wurde auf dem vereinbarten Weg (zum Beispiel per Teams als pptx-Datei) eingereicht.
	Die Präsentationsdatei wurde im vereinbarten Zeitfenster eingereicht.
	Die Präsentationsdatei hat die vereinbarte Anzahl Folien.
	Die Präsentationsdatei hat eine sinnvolle Titel- und eine sinnvolle Schlussfolie (Titel, Name, Datum; Schluss: QR-Code zu Forms-Umfrage «Haben Sie Fragen?», Dank, Quellennachweise).
	Auf der Titelfolie steht Autorenschaft und Datum.
	Auf jeder Folie steht mindestens ein Bild oder eine Grafik.
	Auf jeder Folie steht die Foliennummer vor der Gesamtfolienzahl.
	Stichworte stehen in den Folien, Sätze stehen in den Notizen.
	Die Präsentation behandelt ausnahmslos das vereinbarte Thema.
	Die Reihenfolge der Folien ist logisch.
	Layout (Farben, Schrift), Übergänge und Animationen aller Folien behindern nicht das Verständnis.
	Alle Texte in Folien und Notizen sind ausnahmslos inhaltlich relevant (nicht trivial).
	Alle Bilder und Grafiken sind inhaltlich relevant (nicht trivial).
	Die Rechtschreib- und Grammatikregeln werden eingehalten.