aanroepen zelfgemaakte dll

[jvsoest]

Hallo,

Heb een simpel dll gemaatk in VB 6 met één procedure erin. Nu wil ik deze in VBA-code gaan gebruiken maar de aanroep lukt niet helemaal.

Ik heb eerst een verwijzing naar de dll gemaakt en daarna onderstaande code gebruikt maar die werkt niet.

Dim cls As Project1.Class1
Set cls = CreateObject("project1.class1")
cls.subPrintDuplex (lngDuplex) 'subPrintduplex zit in de dll

bedankt vast voor tips e.d.

 

[mooncrawler]

Bijgaand een simpel projectje. De Excel-functie stuurt twee getallen door naar de DLL die het totaal teruggeeft.

 

[jvsoest]

ja, inderdaad niet gezien, bedankt!!