Renvoyer une matrice de VBA vers Excel - VB/VBA/VBS - Programmation
Marsh Posté le 30-06-2006 à 14:11:06
tu peux gérer avec un système comme celui ci
en tenant compte que ta matrice initiale est carrée, elle est de A1 à J10 par exemple
dim i as integer
dim j as integer
for i=1 to 10
for j=1 to 10
cells(i+10,j).value = cells(j,i).value
next j
next i
Marsh Posté le 30-06-2006 à 14:32:12
Ok mais j'avais pas trop envie de faire des aller-retours vers excel/VBA car ça coute en temps, surtout si la matrice est volumineuse...
Marsh Posté le 30-06-2006 à 14:35:06
ben pour faire une matrice, excel c'est pratique, et de toute facon, si tu passes de l'écriture main à l'ordi, tu te taperas tot ou tard ta matrice...
ton argument de perte de temps ne me parait donc pas valable
ton tablau dynamique tu le ponds dans excel et puis basta ^^
Marsh Posté le 30-06-2006 à 15:17:00
et à part inversemat(), tu connais un site avec du code VB pour inverser des matrices efficacement? merci
Marsh Posté le 30-06-2006 à 14:06:43
salut
je dois faire une résolution d'un système d'équations linéaires et j'ai donc besoin d'inverser des matrices.
1/ à part la fonction (en anglais) MInverse (membre de Excel.WorksheetFunction), existe-t-il des méthodes pour résoudre les systèmes linéaires du style AX+B=Y?
2/j'ai codé ma matrice comme un tableau dynamique sous VBA.
Ex:
Dim MatDim as integer
MatDim=...
Dim MyMatrix() as double
ReDim MyMatrix(1 to MatDim, 1 to MatDim)
Comment retourner cette matrice dans une plage Excel?
en faisant un range(cells(1,1),cells(MatDim,MatDim))=MyMatrix ?
merci pour votre aide