Discussion :

[Mat32]

Hello,

Je débute en VBA et j'ai un problème de type de variable ...

Voilà j'ai un problème concernant une opération mathématique simple.
J'aimerais diviser chaque membre du vecteur Exp1 par la valeur Exp2 (valeur unique).
Cependant la fonction MMult force la variable Exp2 en Variant qui ne fonctionne pas pour effectuer une division (Exp1(i, 1) / Exp2) ...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Dim Exp1 As Variant
Dim Exp2 As Variant
 
Exp1 = WorksheetFunction.MMult(DataT, t1)
t1T = WorksheetFunction.Transpose(t1)
Exp2 = Application.WorksheetFunction.MMult(t1T, t1)
 
p1 = Exp1
 
For i = 1 To UBound(Exp1)
     p1(i, 1) = Exp1(i, 1) / Exp2
Next

Merci

[L'Albatros]

Bonsoir,

Pourquoi ne la repasses-tu pas en "Long" ?

[brownthefou]

Salut !

Es-tu obligé de déclarer tes deux valeurs en variant ?

Si tu trouves le moyen d'aller les chercher sous type de "string" la fonction CDbl te permet d'effectuer l'opération et avec CStr tu pourras remettre le résultat en string et tu pourras l'intégrer ou tu veux.

PS : CDbl transforme en double mais tu peux le faire en long en single ou en integer

[Mat32]

Hello,

Oui je suis obligé de déclarer mes deux valeurs en variant.
J'avais déjà essayé CDbl mais cela ne fonctionnait pas ...

J'ai enfin trouvé la solution, bien que Exp2 ne contient qu'une seule valeur, la variable est considérée comme un tableau il faut donc ajouter Exp2(1,1)...

Merci