Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Animationsgeschwindigkeiten für bestimmten Animationstyp änd
zurück: Fußzeile per Makro und nur eingeblendete Seiten per pdf weiter: ExcelMakro aus PP ansteuern, ausführen & Diagramme aktua Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Sockesg
Gast


Verfasst am:
02. März 2014, 16:00
Rufname:

Animationsgeschwindigkeiten für bestimmten Animationstyp änd - Animationsgeschwindigkeiten für bestimmten Animationstyp änd

Nach oben
       Version: Office 2007

Hallo zusammen,

ich habe ein kleines technisches Problem. Zunächst einmal beschreibe ich wie die Folie, auf die sich der nachfolgende Code-Snippet bezieht, aussieht.

Auf der Folie befinden sich z.B. zehn Textzeilen. Auf diesen Zeilen liegt die Animation "Erscheinen" und ist zunächst auf satzweise Animation eingestellt.
Vor den Zeilen befinden sich einfache Shapes als Marker (z.B. ein Kreis). Auf diesen Shapes liegt der Typ "Verblassen". Des weiteren sind auf der Folie noch weitere drei oder vier Textboxen, die ebenfalls auf "Verblassen" stehen. Soweit alles ok...

Nun habe ich ein Makro gebaut, das alle Animationen, die auf "Erscheinen" stehen, in z.B. eine wortweise oder zeichenweise Animation mit entsprechender Geschwindigkeit anpasst. Der Code dafür sieht etwa so aus:

Code:
    Dim tmpSeq As TimeLine
    Dim sl As Shape
    Dim effTmp As Effect

    Set tmpSeq = sldActive.TimeLine

    For Each effTmp In tmpSeq.MainSequence
        If effTmp.EffectType = msoAnimEffectAppear Then
            If atType = AT_BY_CHAR Then
                effTmp.Shape.AnimationSettings.TextUnitEffect = ppAnimateByCharacter
                effTmp.Timing.Speed = dblSpeed
            End If
            If atType = AT_BY_WORD Then
                effTmp.Shape.AnimationSettings.TextUnitEffect = ppAnimateByWord
                effTmp.Timing.Speed = dblSpeed
            End If
            If atType = AT_SENTENCE Then
                effTmp.Timing.TriggerType = msoAnimTriggerOnPageClick
                effTmp.Shape.AnimationSettings.TextUnitEffect = ppAnimateByParagraph
            End If
        End If
    Next


Dabei ist
Code:
sldActive
die aktive Slide im Präsentationsmodus und
Code:
atType
lediglich ein Marker für zeichenweise, wortweise oder satzweise.

Wie gesagt, dies klappt eigentlich auch ganz gut. Nun habe ich jedoch in eben genau dieser Konstellation der Folie, den Effekt, dass sobald die erste Animation als "Erscheinen" erkannt wird, augenblicklich alle anderen Animationen der Folie, die auf "Verblassen" stehen, ebenfalls in "Erscheinen" umgewandelt werden.

Ein ähnliches Phänomen gab es schonmal. Da war jedoch das Problem, dass "Verblassen" und "Erscheinen" bei zwei Objekten gleichzeitig in der Animation ausgeführt wurden. Aber im oben beschriebenen Fall ist das nicht so.

Ich wäre echt dankbar, wenn mir da jemand von euch einen Tipp geben könnte, woran das liegen könnte.
Ich dachte zunächst, es könnte daran liegen, dass "Verblassen" und "Erscheinen", verwandte Animationstypen sind, aber dies ist nicht der Fall, wie das Debuggen und
Code:
.TextUnitEffect
zeigen.

Vielen Dank im Voraus.

Sockesg
Sockesg
Gast


Verfasst am:
06. März 2014, 23:13
Rufname:


AW: Animationsgeschwindigkeiten für bestimmten Animationstyp - AW: Animationsgeschwindigkeiten für bestimmten Animationstyp

Nach oben
       Version: Office 2007

Hat keine eine Idee...?

Viele Grüße
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Powerpoint Präsentationen: Musik ausblenden nach einer bestimmten Folie 2 *ela* 884 27. Mai 2013, 22:03
*ela* Musik ausblenden nach einer bestimmten Folie
Keine neuen Beiträge PowerPoint VBA (Makros): Folie öffnen und bestimmten Hyperlink entfernen 1 joveny 239 22. März 2013, 22:08
Gast Folie öffnen und bestimmten Hyperlink entfernen
Keine neuen Beiträge PowerPoint VBA (Makros): makro ausführen beim öffnen einer bestimmten folie 5 kanone 445 13. März 2013, 00:59
Case makro ausführen beim öffnen einer bestimmten folie
Keine neuen Beiträge Powerpoint Präsentationen: Rücksprung zu einer bestimmten Folie 1 ppt test 776 26. Aug 2012, 09:22
Alkione Rücksprung zu einer bestimmten Folie
Keine neuen Beiträge Powerpoint Präsentationen: Zu einer BESTIMMTEN STELLE EINER DVD springen 1 Erik der Ahnungslose 276 11. Jul 2012, 11:52
Ute-S Zu einer BESTIMMTEN STELLE EINER DVD springen
Keine neuen Beiträge PowerPoint VBA (Makros): PPT nach einem bestimmten Wort durchsuchen 2 Lealo 702 16. Mai 2012, 10:51
Lealo PPT nach einem bestimmten Wort durchsuchen
Keine neuen Beiträge Powerpoint Präsentationen: Powerpoint-Datei ab einem bestimmten Datum ungültig machen 0 screat 399 01. Feb 2012, 22:59
screat Powerpoint-Datei ab einem bestimmten Datum ungültig machen
Keine neuen Beiträge Powerpoint Präsentationen: Hyperlink mit einer bestimmten Stelle verknüpfen 2 Hartmut F. 240 13. Dez 2011, 17:13
Hartmut F. Hyperlink mit einer bestimmten Stelle verknüpfen
Keine neuen Beiträge Powerpoint Präsentationen: Buchstaben schieben sich an bestimmten Stellen zusammen 1 Thorsten2501 505 07. Nov 2011, 13:11
Ute-S Buchstaben schieben sich an bestimmten Stellen zusammen
Keine neuen Beiträge PowerPoint VBA (Makros): Folie nach einer bestimmten Uhrzeit umblättern 0 Beckeol1 649 26. Okt 2011, 09:00
Beckeol1 Folie nach einer bestimmten Uhrzeit umblättern
Keine neuen Beiträge Powerpoint Präsentationen: Zeitleiste Video (ab bestimmten Punkt starten) 2 Gast 1553 14. Jan 2011, 11:38
Gast Zeitleiste Video (ab bestimmten Punkt starten)
Keine neuen Beiträge PowerPoint VBA (Makros): während der Präsentation zu bestimmten Folie springen 0 hostelli 1485 25. Nov 2010, 09:04
hostelli während der Präsentation zu bestimmten Folie springen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS