Results 1 to 2 of 2
  1. #1
    Donottone is offline Novice
    Windows 8 Access 2013
    Join Date
    Jan 2015
    Posts
    1

    Angry macro in Dbase1 call a macro in a Dbase2 getting the error of runt time

    macro in Dbase1 call a macro in a Dbase2 named fornitori.accdb. I'm getting the error:
    errore di run time -2147417851 (80010105) metodo run macro dell'oggetto DoCmd non riuscito
    Below the function called by the macro. I've access 2013 64 bit running under win 8.1 pro with PC surface 3 pro.


    How to correct this error?
    Function fornitori()
    Dim strDB As String
    strDB = "c:\_tubilux\@Bdati\fornitori.accdb"
    Set appAccess = CreateObject("Access.Application")
    appAccess.OpenCurrentDatabase strDB
    appAccess.DoCmd.RunMacro "@Dbase_fornitori_1"


    appAccess.Quit
    Set appAccess = Nothing
    End Function

  2. #2
    June7's Avatar
    June7 is online now VIP
    Windows 7 64bit Access 2010 32bit
    Join Date
    May 2011
    Location
    The Great Land
    Posts
    52,815
    The macro name begins with @ character?

    I don't use macros. I have similar code that runs VBA procedure:

    set accessApp = CreateObject("Access.Application")
    accessApp.OpenCurrentDataBase("C:\path\filename")
    accessApp.Run "ConstructionExtract"
    accessApp.Quit
    set accessApp = nothing
    How to attach file: http://www.accessforums.net/showthread.php?t=70301 To provide db: copy, remove confidential data, run compact & repair, zip w/Windows Compression.

Please reply to this thread with any new information or opinions.

Similar Threads

  1. Replies: 2
    Last Post: 06-30-2013, 09:59 AM
  2. Replies: 9
    Last Post: 12-08-2012, 04:56 PM
  3. Replies: 2
    Last Post: 05-05-2012, 02:34 AM
  4. Replies: 0
    Last Post: 01-12-2011, 12:43 PM
  5. Replies: 0
    Last Post: 05-07-2009, 02:32 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Other Forums: Microsoft Office Forums