Affichage tableau dans MsgBox VBA excel
Fermé
Bonjour,
SOS ,, j'ai besoin d'afficher les elements d'un tableau Tab(i) i correspond au num de la ligne ,, dans une boite MsgBox
tant que i est différent de 1 j'affiche le contenu de la cellule ("A" i) et je passe à la ligne.
merci d'avance de votre aide ,,, c'est urgent
SOS ,, j'ai besoin d'afficher les elements d'un tableau Tab(i) i correspond au num de la ligne ,, dans une boite MsgBox
tant que i est différent de 1 j'affiche le contenu de la cellule ("A" i) et je passe à la ligne.
merci d'avance de votre aide ,,, c'est urgent
A voir également:
- Afficher un tableau vba
- Tableau word - Guide
- Tableau ascii - Guide
- Impossible d'afficher le rapport de tableau croisé dynamique sur un rapport existant ✓ - Forum Excel
- Tableau croisé dynamique - Guide
- Trier un tableau excel - Guide
6 réponses
Utilisateur anonyme
8 août 2008 à 13:58
8 août 2008 à 13:58
Bonjour,
Exemple type :
Lupin
Exemple type :
Option Explicit
Sub AfficheTableau()
Dim Tableau(1 To 10) As String
Dim strMessage As String, Boucle As Integer
Tableau(1) = "France"
Tableau(2) = "Espagne"
Tableau(3) = "Italie"
Tableau(4) = "Chine"
Tableau(5) = "Portugal"
Tableau(6) = "Canada"
Tableau(7) = "Brésil"
Tableau(8) = "Argentine"
Tableau(9) = "Vénézuela"
Tableau(10) = "Australie"
strMessage = ""
For Boucle = 1 To 10
strMessage = strMessage & Tableau(Boucle) & vbLf
Next Boucle
MsgBox strMessage
End Sub
'
Lupin
