Selectionner le texte dans Messagebox VBA

Résolu/Fermé
Timelinker - 26 avril 2011 à 11:05
 Timelinker - 28 avril 2011 à 11:15
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



A voir également:

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
1
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
26 avril 2011 à 11:47
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")
1
merci, en effet j'ai pu obtenir ce que je voulais avec une userform !
0