Embed ApplicationGE in PowerPoint

[Joshua]

I have limited VBA experience, but would like to embed a viewer in a
PowerPoint slide. I do not want to (can't at work) use
googleearthairways ActiveX control. Is this possible?

So far I have:

Private Sub EmbedGE()

Dim PPApp As PowerPoint.Application
Dim PPPres As PowerPoint.Presentation
Dim PPSlide As PowerPoint.Slide

Set PPApp = GetObject(, "PowerPoint.Application")
Set PPPres = PPApp.ActivePresentation
Set PPSlide = PPApp.ActivePresentation.Slides(1)


Dim GEA As ApplicationGE
Set GEA = New ApplicationGE

End Sub


This fires the application outside of PP. I want to fire the app
inside a shape object (I think) in my slide in PP. I just don't know
how to make the connection. Thanks for any help you can offer!

Josh