PowerPoint slide popup with database linked

[jkhung426]

I have a powerpoint presentation that have a VBA module that is written to
show text within a pop-up when every time you mouse-over an image and click
on the popup textbox again to delete the pop-up from the slides.

My question is that I want to use this as a template and maybe figure out a
way to have database link to this text i have for the Pop-up. Because, every
month this text value changes and I like to maybe link it to a database so i
will not have to type in the value every month? Do you have any idea how i
can do this? thanks again...

 

[jkhung426]

Hi Steve,

I'm sorry for not being clear.

I have a global map with company logos. I have written a macro that is to
show a popup text box with pre-determined text when I mouse-over the logo
using the active settings.

Instead of updating the popup text content for each of the macros i have for
all the logos everytime when data is changed. I was wondering if anyone know
a way to link a database file to each of these popup text boxes. So, when
database is updated with new data. So will the content of my popup textbox...

Your help is greatly appreciated! thanks!

 

[jkhung426]

Hi Steve,

Thanks for your prompt reply.

I want to drive the data from a database server and not from the power point
it self.

Here's the code that I've been using for the text pop-up:

Sub Popup(osh As Shape)

Dim oPopup As Shape
Dim oSl As Slide
Dim dOffset As Double
dOffset = 25

Set oSl = osh.Parent
' create a rectangle for the popup
Set oPopup = oSl.Shapes.AddShape(msoShapeRectangle, _
osh.Left + dOffset, _
osh.Top + dOffset, _
osh.Width + dOffset, _
osh.Height + dOffset)

' set popup shape properties here as needed
With oPopup
' fill
.Fill.ForeColor.RGB = RGB(255, 255, 200)
' text settings
With .TextFrame
.WordWrap = msoTrue
With .TextRange
' text color
.Font.Color.RGB = RGB(0, 0, 0)
.Text = "My text here that I like to pull from the database
server so it updates automatically."
End With
End With

End With
End Sub


The above codes works fine however, i would need to update the text I want
to show everytime when data changes. How would I incorporate this code to
pull data from a database so, everytime when data changes, the slide updates
are updated as well?

Thanks,

James

 

[jkhung426]

Hi Steve,

Thanks again. Which way would have been easier? Coded from the database
itself or from the PPT? Can you show me how I would code it if I want to
drive it from the PPT?

Thanks again. your help is greatly appreciated!