In this video you will learn to add motion effect to shape using VBA. Here in the video you will learn to move and rotate the shape with just a click on the button.
You Might need this to write code:
Enabling Developer and Macro in PPT: • How to Enable Developer Tap and Macro for ...
VBA code:
'Note: change the slide and shapes name as it is in your project
Sub moveright() 'to move the shape to right
ActivePresentation.Slides(1).Shapes("Rectangle").IncrementLeft = -10 'change as you want
End Sub
Sub moveleft() 'to move the shape to left
ActivePresentation.Slides(1).Shapes("Rectangle").IncrementLeft = 10 'change as you want
End Sub
Sub movetop() 'to move the shape to top
ActivePresentation.Slides(1).Shapes("Rectangle").IncrementTop = -10 'change as you want
End Sub
Sub movebottom() 'to move the shape to bottom
ActivePresentation.Slides(1).Shapes("Rectangle").IncrementLeft = -10 'change as you want
End Sub
Other VBA related Videos:
Protecting VBA code: • How to protect your VBA code in Power Poin...
Making timer : • How to make a timer in Power Point using V...
Tic Tac Toe using VBA: • Tic Tac Toe Game in Power Point_Power Poin...
Maze Game Using VBA: • How to make a maze game In PowerPoint with...
コメント