- Joined
- Nov 27, 2018
- Messages
- 1
- Reaction score
- 0
I dont know why, but this piece of code doesnt seem to work.. Any help???
Private Sub CommandButton1_click()
If Slide1.m.Text = g Then
ActivePresentation.SlideShowWindow.View.GotoSlide 3
ElseIf Slide1.m.Text = h Then
ActivePresentation.SlideShowWindow.View.GotoSlide 4
Else
ActivePresentation.SlideShowWindow.View.GotoSlide 1
End If
End Sub
anyone help?
Private Sub CommandButton1_click()
If Slide1.m.Text = g Then
ActivePresentation.SlideShowWindow.View.GotoSlide 3
ElseIf Slide1.m.Text = h Then
ActivePresentation.SlideShowWindow.View.GotoSlide 4
Else
ActivePresentation.SlideShowWindow.View.GotoSlide 1
End If
End Sub
anyone help?