J'ai ce message d'erreur et je comprend pas pourquoi : Cannot create ActiveX component

'DDL init
 Dim janConvDLL As Object
        janConvDLL = CreateObject("janGraphics.Compendium")

        ' Bild convert
        Dim sMsg As String
        Dim sFile1 As String
        Dim sFile2 As String

        ' IN "Bitmap"
        sFile1 = directory & "Bmp.bmp"

        ' OUT GIF
        sFile2 = directory & "Bmp.gif"