Bonjour,

Je suis des cours de VBA dans le cadre d'une formation continue. Notre prof est un peu avare d'exemple et je coince sur un TD.
Je dois remplir deux matrices de 3x3 pour les additionner puis les multiplier.

Voila ce qui est attendu, sans mettre de parametre dans la sub, je me suis balladé pour faire l'exercice, mais ce n'est pas ce qui était attendu.
Et sous cette forme, je n'arrive pas à déclarer la taille du tableau re

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Public Sub RemplirTableau(ByVal Tab1 As Integer, ByVal Tab2 As Integer)
dim i As Integer
Dim j As Integer
    For i = 1 To 3
        For j = 1 To 3
        Tab1(i, j) = 2 
       Tab2(i, j) = 3        
   Next
        Next
End Sub
Lorsque je rappelle la sub pour faire un affichage avec une autre sub, le debogueur me répond type incompatible

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub Test()
Dim Tab1(3, 3) As Integer
Dim Tab2(3, 3) As Integer
 
Call remplirTableau(Tab1, Tab2)
 
    Debug.Print Tab1(1, 1)
End Sub
Si quelqu'un peut m'aider
merci

bonne soirée