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"...
Pour consulter la suite, découvrez le livre suivant :
couv_TP21EXCV.png
60-signet.svg
En version papier
20-ecran_lettre.svg
En version numérique
41-logo_abonnement.svg
En illimité avec l'abonnement ENI
130-boutique.svg
Sur la boutique officielle ENI
Précédent
Corrigé 5.5 Initialiser un tableau avec une boucle
Suivant
Corrigé 5.7 Déclarer et utiliser un tableau à plus de deux dimensions