Zitat:
Original geschrieben von hewlett
Danke erst mal, und wie füge ich das ganze in Powerpoint ein, hab leider überhaupt keine Ahnung! Hab mit VBA überhaupt noch nichts gemacht.
Und wie kann ich Grafik verändern?
|
Zuerst blendest Du Dir die Steuerelemente-Toolbox ein.(Mit Rechtsklick auf die Menüleiste)
Dann einen CommandButton auf die Folie setzten, von der aus zurückgesprungen werden soll und wie auch immer Beschriften.
(Rechtsklick auf den Button->Eigenschaften->Caption)
Auf der Folie auf der die Grafik geänder werden soll:
Aus der Steuerelemente-Toolbox zwei Bilder einfügen->jeweils unter den Eigenschaften den Bild-Elementen ein Bild zuweisen.
(Rechtsklick auf den Button->Eigenschaften->Picture)
Die Bilder in der Grösse und Form anpassen.
Das Bild-Element "Image1" wird als erster angezeigt und "Image2" wenn zurückgesprungen wird.
Deswegen bei "Image2" Rechtsklick auf den Button->Eigenschaften->Visible auf false setzten.
Dann Rechtsklick auf den CommandButton und auf Code anzeigen klicken.
Und jetzt:
Code:
Private Sub CommandButton1_Click()
Slide2.Image1.Visible = False
Slide2.Image2.Visible = True
SlideShowWindows(1).View.GotoSlide 2 'auf folie 2 springen
End Sub
Ich hoffe es hilft ein wenig.
mfG
Testi