Corrigé 5.6 Déclarer et utiliser un tableau à deux dimensions

Sub EX6()  
  Dim intTab2D(1 To 5, 1 To 5) As Integer  
  Dim intLigne As Integer  
  Dim intColonne As Integer  
  VBA.Randomize  
  For intLigne = 1 To 5  
    For intColonne = 1 To 5  
      intTab2D(intLigne, intColonne) = (100 * VBA.Rnd) + 1  
      Debug.Print "Ligne", intLigne, "Colonne"...