Results 1 to 3 of 3

Thread: Excel shutting down access?

  1. #1

    Thread Starter
    Member
    Join Date
    Feb 2006
    Posts
    48

    Excel shutting down access?

    Hi,

    Can anyone tell me why this piece of code shuts access down once the procedure has ended, and also how to stop it doing it?

    Code:
    Dim DPath As String
    DPath = "S:\Hockney Folder Structure\CUSTOMER SERVICE\Michael\ACBS\ACBS.mdb"
    Set oApp = CreateObject("Access.Application")
    oApp.Visible = True
    oApp.OpenCurrentDatabase DPath
    Thanks

    C19

  2. #2
    Frenzied Member DKenny's Avatar
    Join Date
    Sep 2005
    Location
    on the good ship oblivion..
    Posts
    1,171

    Re: Excel shutting down access?

    Object variables are always closed when a procedure closes. If you want to open Access and keep it open try using The SHELL command.

    Something like.
    Shell("C:\Program Files\Microsoft Office\OFFICE11\msAccess.EXE", 1)
    Declan

    Don't forget to mark your Thread as resolved.
    Take a moment to rate posts that you think are helpful

  3. #3
    Ex-Super Mod RobDog888's Avatar
    Join Date
    Apr 2001
    Location
    LA, Calif. Raiders #1 AKA:Gangsta Yoda™
    Posts
    60,709

    Re: Excel shutting down access?

    If oApp is defined outside of the procedure like in the general declarations section then it wont close. If its declared in the procedure then the object variable will fall out of scope but it should still remain open depending on which procedure your placing this code in.
    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 PostsVS.NET on Vista Multiple .NET Framework Versions Office Primary Interop AssembliesVB/Office Guru™ Word SpellChecker™.NETVB/Office Guru™ Word SpellChecker™ VB6VB.NET Attributes Ex.Outlook Global Address ListAPI 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

Posting Permissions

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



Click Here to Expand Forum to Full Width