So jetzt hab ich wieder den gleichen Fehler wie vorher:
"Laufzeitfehler '453'
DLL-Einsprungpunkt addieren in c:\temp\test1.dll nicht gefunden"
Addieren heißt die Prozedur in der DLL und ihr werden 3 Argumente übergeben:
Code:
Public Sub addieren(ByVal zahl1 As Integer, ByVal zahl2 As Integer, ByRef summe As Integer)
summe = zahl1 + zahl2
End Sub
Und so hab ich sie in VBA in Access eingebunden:
Code:
Private Declare Sub addierenneu Lib "c:\temp\test1addieren.dll" Alias "addieren" (ByVal z1 As Integer _
, ByVal z2 As Integer, ByRef ergebnis As Integer)
Und das is die Mörderfunktion die die obere Aufrufen soll:
Code:
Private Sub Befehl2_Click()
Call addierenneu(1, 2, ergeb)
MsgBox ergeb
End Sub
PS: das ganze is nur zum Test.
