PowerPoint – Roll-Over efekat u prezentacijama

Roll-Over efekat predstavlja dinamiฤno prikazivanje tekst poruke (slike ili neฤeg sliฤnog) tokom trajanja slajd prezentacije kada korisnik (prezentator) preฤ‘e pokazivaฤem miลกa iznad odreฤ‘enog objekta. Ovaj efekat se najฤeลกฤ‡e sreฤ‡e kod web prezentacija, ali ga je uz pomoฤ‡ malo dovitljivosti i VBA programskog koda moguฤ‡e izvesti i unutar PowerPoint-a. Prikazaฤ‡emo vam kroz ilustrativni primer kako da dobijete ovakav efekat.

Kreirajte slajd ฤiji ฤ‡e izgled biti sliฤan ลกemi prikazanoj na slici. Brojevi prikazani na ลกemi odgovaraju indeksnim vrednostima objekata na slajdu, a oni ฤ‡e biti upotrebljeni u programskom kodu. Unutar action podeลกavanja odredite indekse svih objekata od jedan do ฤetiri, i pridruลพite im naredni makro. Makro je dizajniran tako da ako se pokazivaฤem miลกa preฤ‘e iznad objekata, poruka se prikazuje unutar objekta sa indeksom 4:


Option Explicit
Sub PrikaziPoruku(objekat As Shape)
With SlideShowWindows(1).View.Slide _
.Shapes(4).TextFrame.TextRange
Select Case objekat.ZOrderPosition
Case 1
.Text = „“
Case 2
.Text = „Poruka kada mis predje iznad objekta 2“
Case 3
.Text = „Poruka kada mis predje iznad objekta 3“
Case 4
.Text = „Poruka kada mis predje iznad objekta 4“
End Select
DoEvents
End With
End Sub

Osigurajte da je kod svih objekata podeลกena akcija za dogaฤ‘aj Mouse Over, pa tako kliknite desnim tasterom iznad objekta i izaberite opciju Action Settings…. Preฤ‘ite na karticu Mouse Over, i izaberite opciju Run Macro, te u pripadajuฤ‡e tekst polje unesite naziv gornjeg makroa:


PrikaziPoruku

Pratite Krstaricu na www.krstarica.com