VBA Lire matrice nXm+ actualisation résultats

Bonjour tout le monde,
Dans un premier temps j'aimerai lire une matrice nXm de la fauille "S" afin de pouvoir faire des opérations dessus, j'ai bien essayé ça mais ça marche pas

Sub Matri()
Dim S, As Variant
Dim i, j As Integer
n = Range("g3").Value
m = Range("g4").Value

For i = 1 To n
For j = 1 To m
S(i, j)= Worksheets("S").range Cells(3 + i - 1, 2 + j - 1).Value
Next j
Next i

Dans un deuxième temps j'aimerai que les résultats changent dés que je change les données (à savoir la feuille "S", la feuille "W" et les cellules G3 et G4 de la feuille"Act VBA" sans avoir a réexecuter ma macro a chaque fois.

Merci d'avance.
PS : j'ai aussi posté sur CCM.