DLL erstellen in VBA einbinden

[renew]

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:

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:

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:

Private Sub Befehl2_Click()

    Call addierenneu(1, 2, ergeb)
    
    MsgBox ergeb
    

End Sub

PS: das ganze is nur zum Test.