power point – ali je možno?
Te opcije pa ni. Jo je kar potrebno napisati, npr. kot Macro:
Imam samo ANgl. PowerPoint:
– Tools
– Macro — Macros
Vpiši ime Macroja, npr. Nakljucno
in klikni Create
Potem pobriši vso vsebino, katera se začne nekaj kot:
Sub Nakljucno()
konča pa kot:
End Sub
pa prekopiraj noter tole vsebino (komplet):
Sub RandomizeSlides()
Dim intIndex As Integer
Dim intRandomSlide As Integer
Dim intSlides As Integer
intSlides = ActivePresentation.Slides.Count
For intIndex = 1 To ActivePresentation.Slides.Count
intRandomSlide = Int((intIndex * Rnd) + 1)
ActiveWindow.ViewType = ppViewSlideSorter
ActivePresentation.Slides(intRandomSlide).Select
ActiveWindow.Selection.Cut
ActivePresentation.Slides(intSlides – 1).Select
ActiveWindow.View.Paste
Next
End Sub
Zapri okno od VB, oz. Macrojev, da se vrneš v tvoj PowerPoint
Izberi
Tools
Macro
Macros
in moraš videti ime tvojega Macroja, katerega potem samo startaš
in to je to, oz. ko startaš Macro – stisni tipko F5
plp
Forum je zaprt za komentiranje.