Bonjour,
j'aimerais afficher dans la fenêtre d'exécution une matrice (tableau à 2 entrées, de dimension quelqconque nxp)
de façon rectangulaire:
5 4 3 2 1
5 4 8 9 7
1 2 3 6 5
4 2 8 9 3
y a t'il un moyen simple?
Merci!
Bonjour,
j'aimerais afficher dans la fenêtre d'exécution une matrice (tableau à 2 entrées, de dimension quelqconque nxp)
de façon rectangulaire:
5 4 3 2 1
5 4 8 9 7
1 2 3 6 5
4 2 8 9 3
y a t'il un moyen simple?
Merci!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Sub imptab(x() As Variant) Dim ligne As Long Dim colonne As Long Dim n As Variant Dim maligne As String For ligne = LBound(x, 1) To UBound(x, 1) maligne = "" For colonne = LBound(x, 2) To UBound(x, 2) maligne = maligne & x(ligne, colonne) & " " Next colonne Debug.Print Left(maligne, Len(maligne) - 1) Next ligne End Sub
Merci (sisi elle est belle! )
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager