VBA

Bonjour,
Sub Macro()
Dim Tab1(4, 4) As Integer
Dim Tab2(4, 4) As Integer
Dim Tab_Resultat(4, 4) As Integer
For ligne = 1 To 4
For colonne = 1 To 4
Tab1(ligne, colonne) = Worksheets("So").Cells(ligne + 49, colonne + 4).Value
Next colonne
Next ligne
For ligne = 1 To 4
For colonne = 1 To 4
Tab2(ligne, colonne) = Worksheets("So").Cells(ligne + 49, colonne + 4).Value
Next colonne
Next ligne
For i = 1 To 4
For j = 1 To 4
Som = 0
For k = 1 To 4
Som = Som + Tab1(i, k) * Tab2(k, j)

Next k
Tab_Resultat(i, j) = Som
Next j
Next i
For ligne = 1 To 4
For colonne = 1 To 4
Worksheets("So").Cells(ligne + 56, colonne + 5).Value = Tab_Resultat(ligne, colonne)
Next colonne
Next ligne


End Sub


Que réalise cette macro ?
Mercii