Sujet Précédent Sujet Suivant

Fonction produit de matrice

sugvesta Messages postés 6 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 30 mars 2009 - 27 mars 2009 à 17:25
sugvesta Messages postés 6 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 30 mars 2009 - 30 mars 2009 à 15:14
Bonjour, je code une simple fonction produit de matrice en VBA mais ca me donne un resultat faux, je ne manipule pas encore tres bien les tableaux. Help.


Function produitmatrice(matrice1 As Variant, matrice2 As Variant) As Variant

Dim m, p As Variant


Dim i, j As Integer

m = matrice1
p = matrice2
a = UBound(m, 1)
b = UBound(p, 2)
c = UBound(m, 2)
ReDim summ(a, b)

'For i = 1 To a
'For j = 1 To b
'summ(i, j) = 0
'Next j
'Next i

For i = 1 To a
For j = 1 To b
For k = 1 To c
summ(i, j) = summ(i, j) + m(i, k) * p(k, j)
Next k

Next j
Next i

produitmatrice = summ

End Function

1 réponse

Réponse 1 / 1
sugvesta Messages postés 6 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 30 mars 2009
30 mars 2009 à 15:14
Personne????
0

Discussions similaires

gestion catalogue de produit
Diary@gmail -
BunoCS -

5 réponses
Python avec produit scalaire
banirarrr -
hbouia -

1 réponse
produit scalaire et somme
mouais1 -
mouais1 -

2 réponses
addition et multiplication de vecteur
titou_hello -
fred1599 -

8 réponses
Fonction Produit de Matrices
Sweden81 -
Orohena -

3 réponses
Rejoignez-nous