Skip to main content

Posts

4 Awesome PowerPoint Drag and Drop Tutorials

I have done drag and drop differently in the past but this will now be my new go to script for all my projects in the future. Check it out for yourself. '//////////////////////////////////////////////////////////////////////This is the code Option Explicit Private Const SM_SCREENX = 1 Private Const SM_SCREENY = 0 Private Const msgCancel = "." Private Const msgNoXlInstance = "." Private Const sigProc = "Drag & Drop" Private Const VK_SHIFT = &H10 Private Const VK_CTRL = &H11 Private Const VK_ALT = &H12 Public Type PointAPI  X As Long  Y As Long End Type   Public Type RECT  lLeft As Long  lTop As Long  lRight As Long  lBottom As Long End Type Public Type SquareEnd  X As Long  Y As Long End Type #If VBA7 Then  Public Declare PtrSafe Function GetKeyState Lib "user32" (ByVal nVirtKey As LongPtr) As Integer  Public Declare PtrSafe Function WindowFrom

Button States From A Table

I was asked recently to create a button that would have different states ( normal, hover over, down ). My first thought was to just use a command button from the developer tab. But they are pretty bland and somewhat clunky 1980's PC designed. I remembered a couple of ways that I have updated slide data before, sometimes from a table or another shape, both are very flexible techniques. The technique I'll show here is the table technique it is very straightforward and a creative mind will easily see the possibilities for more interesting uses. The Process: On any slide create a shape I've put mine on the first slide hence in the script it reads ActivePresentation.Slides(1) when I refer to the path of the shape. You can change the number if your shape is on a different slide. Once you create your shape in the Selection Pane rename your object to myButton or something else that you can remember easily later. Then create another shape and make it larger than your butt

Simple Node Code

I've seen loads of solutions to building slide shows that use a callout that has a speech tag that points to the item of interest on the slideshow page. All of them include many many slides and navigation cobwebs. The simplest way I have found to do this is by using an array, an if statement and the ".Nodes.SetPosition" method. I won't show all the code for that here, that will be saved for a book I'll publish later down the track. But with this VBA most of you will get the picture. Firstly add a callout to your slide and right click on it and choose the "Edit Points" option. Then move the point at the tip of the callout tag the one with the yellow point. This will convert the callout to a code editable object. Now on the top ribbon choose the developer tab and then select the macro icon. If you can't see the developer tab in the ribbon, a quick Google search will bring up a bunch of tutorials on what to do to make it available and how to turn

Why PowerPoint?

To begin with, I don't know of any other software that is capable of creating standalone multimedia interfaces that are self-serving ( no host needed ) and available to most everybody with a PC. I know of Apache and Lybra Open Office but in the company I work, they are not readily available or liked. PowerPoint is on every machine in our organisation and is considered an enterprise solution that is secure and stable. Nearly everyone around the world is moving away from swf and actionscript, something I am remorseful about. I had fun using AS2 and AS3. Adobe Flash was one of the better animation tools around. I have looked at Adobe Animate and it's still a good animation software but the html5 that it outputs is not fully compatible with every browser. In fact in most cases with html5 there is an awful lot that can go wrong. If you want standalone apps, for instance, you are severely encumbered. PowerPoint at least for me, ticks all the boxes. It has a great variety of illustrat