Posez votre question Signaler

Affichage tableau dans MsgBox VBA excel

redyou - Dernière réponse le 28 janv. 2011 à 09:09
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
Lire la suite 

Affichage tableau dans MsgBox VBA excel »

6 réponses
Réponse
+5
moins plus
Bonjour,

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
Ajouter un commentaire
Réponse
+1
moins plus
J'ai le même problème, c'est à dire que je dois afficher le contenu d'un tableau dynamique dans une message box, et faire un retour à la ligne après chaque valeur pour que ce soit présenté comme une liste.

Comment faire pour boucler le contenu d'une liste dans une message box ..?
Ajouter un commentaire
Réponse
+1
moins plus
Bonjour

Affichage d'un tableau dans une MsgBox
http://www.commentcamarche.net/forum/
affich-7799101-affichage-d-un-tableau-dans-une-msgbox#0


Merci
Ajouter un commentaire
Réponse
+1
moins plus
bonjour,
tu peut utilise un boucle incrémentée de 1 à n et-puis converse les contenu en string
Ajouter un commentaire
Réponse
+1
moins plus
Merci à Lupin !
Ajouter un commentaire
Réponse
-1
moins plus
bonjour
je ne m y connais pas trop mais j v essayer de t aider
do
MsgBox NomTableau(i)
msgbox range("A" i)
i=i+1
while (i<>1)
Ajouter un commentaire
Ce document intitulé « affichage tableau dans MsgBox VBA excel » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?