Bonjour à tous,
 
tout d'abord je tiens à préciser que mes connaissances en programmation sont assez limitées. Je connais juste le B.A.BA pour réaliser quelques macros simples sous VBA excel. C'est pourquoi, j'ai besoin de votre aide car je cale sur le problème suivant :
je dispose d'un dll qui s'appelle CRKServer.dll

Ce dll permet, grâce à une fonction qui s'appelle CRating, de déterminer les caractéristiques d'un compresseur pour des conditions de fonctionnement données.

La documentation me donne l'exemple suivant

 
pourriez-vous m'expliquer comment completer/modifier l'exemple donné ci-dessus pour que ça fonctionne ?
 
 
Merci d'avance.

Je vois pas bien quelle est ta question
 
si c'est un problème de dll -> regsvr32 crkserver.dll puis tu devrais pouvoir la réutiliser dans VB ...

pardon, j'aurais du insister sur le fait que je n'y connais rien.
Donc, j'ai bien exécuté la commande regsvr32 crkserver.dll comme tu l'as conseillé.  
Mais dans VBA, si je fais un copier coller de l'exemple tel quel, j'ai une erreur de compilation au niveau de la ligne Set myCOMObject = New CRate
 
Dim str_compModelName As String  
Dim lng_refrigCode, lng_powSupCode As Long  
Dim bln_tempMidpoint, bln_suctionSGR As Boolean
Dim dbl_suctionRetGasTemp, dbl_subcooling As Double
Dim bln_requiredOutputArray(5) As Boolean
Dim dbl_capacityArray(10, 7) As Double
Dim dbl_powerArray(10, 7) As Double
Dim dbl_currentArray(10, 7) As Double
Dim dbl_massFlowArray(10, 7) As Double
Dim dbl_heatRejectArray(10, 7) As Double
Dim lng_errorArray(10, 7) As Long
 
Private Sub cmdCalculate_Click()
 
Dim myCOMObject As Object
Set myCOMObject = New CRate
Call myCOMObject.CRating(str_compModelName, _
                         lng_refrigCode, _
                         lng_powSupCode, _
                         bln_tempMidpoint, _
                         bln_suctionSGR, _
                         dbl_suctionRetGasTemp, _
                         dbl_subcooling, _
                         bln_requiredOutputArray(), _
                         dbl_capacityArray(), _
                         dbl_powerArray(), _
                         dbl_currentArray(), _
                         dbl_massFlowArray(), _
                         dbl_heatRejectArray(), _
                         lng_errorArray())
 
End Sub
 
Dons les questions que je me pose sont :
1) Faut-il ajouter quelque chose en plus ?
2) Est-ce que le code donné est correct ?
 
En gros, j'aimerais avoir un code qui fonctionne correctement mais comme je n'y connais vraiment pas grand chose, je ne sais pas ce qu'il faut changer, ajouter, modifier.
 
Merci d'avance pour votre aide    
 
 

Ca fait des lustres que j'ai plus bossé en VB6 y'a certainement une chose à faire pour que VB voie le fameux composant en question mais je sais plus du tout comment ...

Ce qu'il faut faire est indiqué dans le bout de documentation qu'il a posté : il faut ajouter la réference à la DLL en question pour la rendre visible depuis VB

+1  

Petite rectification : l'auteur du topic parle de VBA Excel et non de VB6. La solution est toujours la même (ajouter la référence), mais le chemin pour y parvenir est différent : ouvrir l'éditeur VBA d'Excel et ajouter la référence via le menu Outils/Références.