Boucle dans Msgbox sous VBA
Résolu
okryn
-
okryn Messages postés 1 Date d'inscription Statut Membre Dernière intervention -
okryn Messages postés 1 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je suis désolée si ce sujet a déjà été traité, j'ai pourtant pris deux heures pour faire le tour de tout ce que je trouvais...
Je souhaite créer une boucle qui m'affiche une liste de cellules dans un même msgbox :
La colonne A de ma Feuil1 contient des noms :
A1 = nom 1
...
An = nom n
Je souhaite afficher un unique msgbox où apparaîtraient mes noms sous la forme :
Nom 1
Nom 2
Nom 3
...
Nom n
(séparés par des retours à la ligne)
Si quelqu'un peut m'aider là-dessus, ce serait déjà très bien, je n'arrive pas à trouver la syntaxe correcte pour insérer la boucle dans le msgbox.
Si, dans le meilleur des mondes, ceux qui me prêteront main forte savent comment présenter mon texte sous la forme :
Nom 1
Nom 2
Nom 3
Nom 4
Nom 5
....
Ce serait vraiment fantastique !
Je vous remercie de votre aide !
je suis désolée si ce sujet a déjà été traité, j'ai pourtant pris deux heures pour faire le tour de tout ce que je trouvais...
Je souhaite créer une boucle qui m'affiche une liste de cellules dans un même msgbox :
La colonne A de ma Feuil1 contient des noms :
A1 = nom 1
...
An = nom n
Je souhaite afficher un unique msgbox où apparaîtraient mes noms sous la forme :
Nom 1
Nom 2
Nom 3
...
Nom n
(séparés par des retours à la ligne)
Si quelqu'un peut m'aider là-dessus, ce serait déjà très bien, je n'arrive pas à trouver la syntaxe correcte pour insérer la boucle dans le msgbox.
Si, dans le meilleur des mondes, ceux qui me prêteront main forte savent comment présenter mon texte sous la forme :
Nom 1
Nom 2
Nom 3
Nom 4
Nom 5
....
Ce serait vraiment fantastique !
Je vous remercie de votre aide !
A voir également:
- Boucle dans Msgbox sous VBA
- Excel compter cellule couleur sans vba - Guide
- Télé samsung s'éteint et se rallume en boucle - Forum Téléviseurs
- Vba attendre 1 seconde ✓ - Forum VB / VBA
- Xiaomi s'éteint tout seul et se rallume en boucle - Forum Xiaomi
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
4 réponses
bonjour
Sub enumerer()
fin = Range("A100").End(xlUp).Row
For cpt = 1 To fin
Message = Message & Cells(cpt, "A") & vbLf
Next
MsgBox Message
End Sub
Salut,
Je ne sais pas si j'ai tout bien compris, mais en supposant que tes noms se trouve en A2 à A6 insére ce code dans un module ou dans ton code
Sub test()
MsgBox [A2] & vbCrLf & [A3] & vbCrLf & [A4] & vbCrLf & [A5] & vbCrLf & [A6]
End Sub
ou dans un bouton activex
Private Sub CommandButton1_Click()
MsgBox [A2] & vbCrLf & [A3] & vbCrLf & [A4] & vbCrLf & [A5] & vbCrLf & [A6]
End Sub
Je ne sais pas si j'ai tout bien compris, mais en supposant que tes noms se trouve en A2 à A6 insére ce code dans un module ou dans ton code
Sub test()
MsgBox [A2] & vbCrLf & [A3] & vbCrLf & [A4] & vbCrLf & [A5] & vbCrLf & [A6]
End Sub
ou dans un bouton activex
Private Sub CommandButton1_Click()
MsgBox [A2] & vbCrLf & [A3] & vbCrLf & [A4] & vbCrLf & [A5] & vbCrLf & [A6]
End Sub
