Results 1 to 2 of 2

Thread: Calling PowerPoint from VB 6

  1. Jun 14th, 2006, 07:56 PM #1
    DWPTrails
    DWPTrails is offline

    Thread Starter
    New Member
    Join Date
    Jun 2006
    Posts
    1

    Smile Calling PowerPoint from VB 6

    VB Code:
    1. Dim ppt As New PowerPoint.Application

    2.  
    3. strFileName = strDrive & "dwptrails\Powerpoint Slides\" & ppt_id  & "_MoreInfo.pps"

    4.  
    5. ppt.Visible = True

    6. ppt.Presentations.Open strFileName

    7.  
    8. ppt.ActivePresentation.SlideShowSettings.Run

    9.  
    10. Set ppt = Nothing

    The above code works fine when using Powerpoint 2003. By fine, I mean that the slideshow comes forward to the front while the vb application remains in the background. But when using Powerpoint 2002, the slideshow somehow remains in the background (still working) while the vb application remains in front. Is there a way to force the slideshow to come forward to the front when using Powerpoint 2002? Of course, an easy way out would be a purchase of the 2003 version. But other than this, am I missing a code or something?

    -DWPTrails
    Reply With Quote Reply With Quote
  2. Jun 16th, 2006, 07:52 PM #2
    RobDog888
    RobDog888 is offline
    Ex-Super Mod RobDog888's Avatar
    Join Date
    Apr 2001
    Location
    LA, Calif. Raiders #1 AKA:Gangsta Yoda™
    Posts
    60,709

    Re: Calling PowerPoint from VB 6

    Welcome to the Forums.

    Try this after the .Run line.
    VB Code:
    1. ppt.Activate
    VB/Office Guru™ (AKA: Gangsta Yoda™ ®)
    I dont answer coding questions via PM. Please post a thread in the appropriate forum.

    Microsoft MVP 2006-2011
    Office Development FAQ (C#, VB.NET, VB 6, VBA)
    Senior Jedi Software Engineer MCP (VB 6 & .NET), BSEE, CET
    If a post has helped you then Please Rate it!
    • Reps & Rating Posts • VS.NET on Vista • Multiple .NET Framework Versions • Office Primary Interop Assemblies • VB/Office Guru™ Word SpellChecker™.NET • VB/Office Guru™ Word SpellChecker™ VB6 • VB.NET Attributes Ex. • Outlook Global Address List • API Viewer utility • .NET API Viewer Utility •
    System: Intel i7 6850K, Geforce GTX1060, Samsung M.2 1 TB & SATA 500 GB, 32 GBs DDR4 3300 Quad Channel RAM, 2 Viewsonic 24" LCDs, Windows 10, Office 2016, VS 2019, VB6 SP6
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width