[Excel-VB] Copier un texte depuis msgbox ?

mortelrdv -  
xav3601 Messages postés 3289 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je suis sous XP avec Excel 2003 SP3
prenons le code ci-dessous :
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


ça va m'afficher un fenetre message, et parfois j'ai besoin des données qu'elle m'affiche pour faire autres choses.
Je voulais faire 'selectionner texte puis Ctrl+C' mais ça ne marche pas.

avez vous une solution ?
faut il que je passe par le userform ? (j'y connais pas trop)

Merci
A voir également:

1 réponse

xav3601 Messages postés 3289 Date d'inscription   Statut Membre Dernière intervention   311
 
En effet en passant par un userform avec une textbox tu pourras récupérer le texte qui sera afficher!
0