Selectionner le texte dans Messagebox VBA
Résolu
Bonjour,
Je suis un bizuth du VBA!
Je cherche à créer une fenêtre affichant un texte, que l'on pourrait ensuite selectionner pour effectuer un copié collé. Pour l'instant le programme que j'ai est le suivant, on clique sur le bouton "society" pour faire apparaître la fenêtre :
Private Sub society_Click()
Select Case MsgBox("Unter Gereuth 9611" Mon Texte", vbOKOnly + vbInformation, "Address and contact")
End Select
End Sub
Malheureusement la fenêtre qui s'affiche n'autorise pas la sélection du texte "Mon Texte". Comment je pourrai faire ça svp ???
Merci beaucoup !
Jonathan
Je suis un bizuth du VBA!
Je cherche à créer une fenêtre affichant un texte, que l'on pourrait ensuite selectionner pour effectuer un copié collé. Pour l'instant le programme que j'ai est le suivant, on clique sur le bouton "society" pour faire apparaître la fenêtre :
Private Sub society_Click()
Select Case MsgBox("Unter Gereuth 9611" Mon Texte", vbOKOnly + vbInformation, "Address and contact")
End Select
End Sub
Malheureusement la fenêtre qui s'affiche n'autorise pas la sélection du texte "Mon Texte". Comment je pourrai faire ça svp ???
Merci beaucoup !
Jonathan
2 réponses
-
oups, petite erreur, mon programme actuel c'est :
Private Sub society_Click()
Select Case MsgBox("Mon Texte", vbOKOnly + vbInformation, "Address and contact")
End Select
End Sub
Merci pour votre aide !
Jonathan -
ModérateurBonjour,
Pour pouvoir sélectionner le texte, effectivement MsgBox n'est pas la meilleure solution.
Vois du côté de InputBox, voir même, et c'est certainement la meilleure solution, du côté des UserForm...
Code d'inputbox :Dim result As String result = MsgBox("Unter Gereuth 9611 Mon Texte", vbOKOnly + vbInformation, "Address and contact") result = InputBox("Unter Gereuth 9611", "Address and contact", "Mon Texte")
