Selectionner le texte dans Messagebox VBA Résolu/Fermé

Question

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



Configuration: Windows XP / Internet Explorer 8.0

Timelinker · Answer

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

pijaku · Answer

Bonjour,
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")

Selectionner le texte dans Messagebox VBA

2 réponses

Discussions similaires