Run Access Makro
24.09.2003 21:15:58
Heinz Heldmaier
ich habe ein Problem mit einem VBA Code den ich Angehängt habe. Mit dem Code möchte ich aus einem Excel-Sheet ein Makro aus einer MS-Access Datenbank starten. Ich habe den Code übrigens aus Herbers Excel Beispiel CD kopiert aber er funktioniert nicht. Ich bekomme die Fehlermeldung:
Anwendungs- oder objektdefinierter Fehler 2517
Microsoft Access kann die Prozedur 'DailyProcess' nicht finden.
Was mache ich / oder ist falsch?
Danke im Vorraus wenn jemand eine Idee hat.
Heinz Heldmaier
Excel Code:
Sub CommandButton2_Click()
Dim accApp As Object
Dim sFile As String
Dim index As Integer
sFile = Range("B16").Value
If Dir(sFile) = "" Then
Beep
MsgBox "Access-Datenbank wurde nicht gefunden!"
Else
Set accApp = CreateObject("Access.Application")
accApp.OpenCurrentDatabase sFile
On Error GoTo errorhandler
accApp.Run "DailyProcess"
accApp.CloseCurrentDatabase
Set accApp = Nothing
End If
errorhandler:
For index = 2510 To 2520
Debug.Print Error$(index) & " " & index
Next index
End Sub