Discussion :

[yasquare]

Bonjour,
J'ai un petit problème avec une dll. En effet, j'aimerais manipuler des matrice avec des dll a fin de faire des calculs matriciels sous Excel. Pour cela j'ai commencé par une simple dll:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
// in : matrix , out : matrix
LPSAFEARRAY FAR *  __stdcall Optimization(LPSAFEARRAY FAR *variance){ 
    return variance;
}

et je l'appelle sous VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
    Declare Function Optimization Lib "Optimization.dll" (ByRef integerArrayA() As Double) As Double
    Sub test1()
       Dim a() As Double
       ReDim a(1 To 3, 1 To 3) As Double
           For u = 1 To 3
               For v = 1 To 3
                   a(u, v) = 0
               Next
           Next
    bb = Optimization(a())
    End Sub

Comme vous pouvez le voir, c'est très simple; par contre quant je compile il me sort cette erreur : " Expression trop complex" (i.e. bb = Optimization(a()) )
Merci d'avance.

Ya²

[dadavyvy]

Et sans les parentheses?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

bb = Optimization(a)

[yasquare]

même chose !!! ça marche pa

[dadavyvy]

Et en modifiant la DLL ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
LPSAFEARRAY FAR *  __stdcall Optimization(LPSAFEARRAY FAR *variance){ 
    return *variance;
}

Desole, mais je n'ai que vagues souvenirs de C++...

[yasquare]

là ça bloque au niveau de la compilation de la dll, car la valeur retournée est un double pointeur de la structure LPSAFEARRAY...

[dadavyvy]

Tu trouveras surement plus d'exemples dans la FAQ C++ / VB : ici ou là
Si tu trouves la solution, ca m'interesse quand meme...