- Joined
- Aug 19, 2009
- Messages
- 1
- Reaction score
- 0
Hi everybody!
I really need your help.
I'm writing from Germany, and couldn't get any answers in german forums.
I've created a ppt and would like to have a macro to randomize the different sheets.
The PPT consists of 17 sheets. I would like to have a button that mixes the sheets 4 to 16 but leaves sheets 1-3 and 17 untouched.
What's really important for me is that the people I send this file do not have to instal any macros......just clicking and being happy.
I tried this macro which does mix the sheets but I don't know how to create the exceptions for the sheets 1-3 and 17.
Macro:
Private Sub CommandButton1_Click()
ActivePresentation.SlideShowWindow _
.View.GotoSlide Int(Rnd * _
ActivePresentation.Slides.Count) + 1
End Sub
It's really urgent and important for me to get a working macro which works like it should. I don't have any idea of writing macros.
Thanks in advance!
Hopefully someone here can help me!
Greetz from Germany
Copperfield
I really need your help.
I'm writing from Germany, and couldn't get any answers in german forums.
I've created a ppt and would like to have a macro to randomize the different sheets.
The PPT consists of 17 sheets. I would like to have a button that mixes the sheets 4 to 16 but leaves sheets 1-3 and 17 untouched.
What's really important for me is that the people I send this file do not have to instal any macros......just clicking and being happy.
I tried this macro which does mix the sheets but I don't know how to create the exceptions for the sheets 1-3 and 17.
Macro:
Private Sub CommandButton1_Click()
ActivePresentation.SlideShowWindow _
.View.GotoSlide Int(Rnd * _
ActivePresentation.Slides.Count) + 1
End Sub
It's really urgent and important for me to get a working macro which works like it should. I don't have any idea of writing macros.
Thanks in advance!
Hopefully someone here can help me!
Greetz from Germany
Copperfield