affichage tableau dans MsgBox VBA excel Fermé

Question

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

Utilisateur anonyme · Accepted Answer

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

laetitia02 · Answer

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)

Harry974 · Answer

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 ..?

Anonyme · Answer

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

georgesmiming · Answer

bonjour,
tu peut utilise un boucle incrémentée de 1 à n et-puis converse les contenu en string

EnPanik!! · Answer

Merci à Lupin !

Affichage tableau dans MsgBox VBA excel

6 réponses

Discussions similaires