Renvoyer une matrice de VBA vers Excel

Renvoyer une matrice de VBA vers Excel - VB/VBA/VBS - Programmation

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

Reply

Marsh Posté le 30-06-2006 à 14:06:43   

Reply

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

Reply

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...

Reply

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  :heink:  
ton tablau dynamique tu le ponds dans excel et puis basta ^^

Reply

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

Reply

Marsh Posté le 01-07-2006 à 08:30:26    

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed