Discussion :

[LMarie]

Bonjour,
J'aimerais savoir s'il y a une possibilité de sélectionner un texte pour le rendre utilisable par l'utilisateur dans une MsgBox.
Merci d'avance pour vos réponses.

[Zekraoui_Jakani]

Oui; exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub MonMessage()
    Dim MonTexte  As String
    MonTexte = "Bonjour Madame, Medemoiselle, Monsieur !"
    MsgBox MonTexte, vbOKOnly, "Message"
End Sub

[cb_60]

Bonjour
En cellule A1 de la feuil1, le message

Cette macro dans la feuille ou l'on souhaite visualiser la Msgbox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Set toto = Sheets("feuil1").Range("A1")
MsgBox toto
End Sub

Copier le bout de code
Pour mettre la macro, faire un click droit sur l'onglet, visualiser le code, et coller la macro

Au double click dans la feuille ou se trouve la macro, la Msgbox indiquera le message se trouvant dans la cellule A1

[LMarie]

Bonjour,
J'aimerais savoir s'il y a une possibilité de sélectionner un texte pour le rendre utilisable par l'utilisateur dans une MsgBox.
Merci d'avance pour vos réponses.

Dans une boite de dialogue MsgBox j'aimerais sélectionner le texte qui est affiché pour pouvoir l'utiliser. Avec la boite de dialogue actuelle on ne peut pas le sélectionner.
Merci d'avance pour vos réponses.

[cb_60]

re
c'est plutôt une inputbox
test cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim toto As Range
Set toto = Application.InputBox(prompt:="Sélectionner les cellules sur la feuille", Type:=8)
MsgBox (toto.Address & "   " & toto.Text)
End Sub

je viens de relire est je pense que ce n'est pas ce que tu souhaite
en ajoutant cela à la macro tu copie la valeur de ta msgbox dans la cellule A10 de la feuil1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Feuil1.Range("A10").Value = toto

Comment la Msgbox récupère le message affiché dedans?

[kiki29]

Salut, pour info : VBA EXCEL La MsgBox décortiquée

[unparia]

Bonjour

Je deviens décidément de plus en plus méfiant :

Dans une boite de dialogue MsgBox j'aimerais sélectionner le texte qui est affiché pour pouvoir l'utiliser. Avec la boite de dialogue actuelle on ne peut pas le sélectionner.
Merci d'avance pour vos réponses

D'où vient donc cette msgbox ? est-elle générée par le code de ton propre classeur ou est-elle affichée par une application autre que la tienne ?

[LMarie]

Bonjour

Je deviens décidément de plus en plus méfiant :

D'où vient donc cette msgbox ? est-elle générée par le code de ton propre classeur ou est-elle affichée par une application autre que la tienne ?

Bonjour,
Quand on affiche des résultats, par exemple dans un tableau, ou des textes communiqués de façon conditionnelle (if... else..., ou select case) au dessus d'une feuille déjà très remplie, est-ce qu'il existe un moyen de sélectionner des éléments de la boite de dialogue ?
Merci d'avance pour ta réponse.

[unparia]

J'ai des difficultés à comprendre avec assurance ce dont tu parles.
Essaye s'il te plait d'être très précis.
En décrivant par exemple étape par étape.

[patricktoulon]

un msgbox est normalement creer de tout piece dans le code donc ces données (titre ,texte style de bouton icones etc...) sont connus
ma question est donc : pourquoi voudrais tu aller chercher a copier une donnée se trouvant dans le msgbox alors que tu les a deja ??

maintenant si tu me dis que ce msgbox est independant de ta volonté (une eventuelle erreur,un avertissement de securité,ou autres) la c'est different il nous en faut un peu plus pour comprendre ton contexte

pour l'eventualité ou ce serait une erreur tu a err.descryption et err.number
bref attendont ta reponse pour en savoir un peu plus