Opérations matricielles

[Christelle]

Bonjour à tous,

J'ai quelques difficultés à manipuler des matrices sous VBA.
En fait, j'aimerais calculer u=y-beta*x-cste sachant que les variables y, x, beta et cste sont définies de la façon suivante

Dim y, x As Range
Dim beta As Variant
Dim cste As Double

Set y = Range("A1:A10")
Set x = Range("B1:C10")

ReDim beta(1 To 2, 1 To 1)
beta(1, 1) = 2
beta(2, 1) = 1
cste = 3

Merci d'avance

 

[emiaille]

Salut,

je pense que tu pourrais y arriver en faisant 2 boucles "for' imbriquée et en faisant le calcul pour chaque couple ligne/colonne de ta matrice.

Ca donnerait du style :

/*******************************/
nblignes = 10
nbcolonnes = 10
cste = 3

for colonne = 1 to nbcolonnes

for ligne = 1 to nblignes

x = Range("$B$1").Offset(ligne,colonne).Value

y = x - cste

Range("$A$1").Offset(ligne,colonne).Value = y

next
next
/*******************************/

Désolé pour le beta mais je connais pas ce type de declaration alors plutot que d'écrire des conneries...

Bon courage!