View original (French)

VBA get value returned by MsgBox

Solved
Code Jack Posted messages 18 Status Membre -  
 Yop73 -
Hello everyone,

I'm unable to retrieve the value returned by a MsgBox into a variable myChoice. I need to know if the user wants to exit the step-by-step procedure...

Could you help me?

Thank you in advance,

Code Jack

Configuration: Windows 7 / Firefox 5.0

2 réponses

Réponse 1 / 2
pijaku Posted messages 13513 Registration date   Status Modérateur Last intervention   2 771
 
Hello,
It all depends on your MsgBox...
Example with a "yes - no" message box: 
Sub test() Dim result As String, MyChoice As String result = MsgBox("Make your choice!", vbYesNo) If result = vbYes Then MyChoice = "Choice 1: Yes" Else MyChoice = "Choice 2: No" End If MsgBox MyChoice End Sub

--
Best regards,
Franck P
10
Yop73
 
You're welcome!
0
Réponse 2 / 2
Code Jack Posted messages 18 Status Membre 7
 
That is exactly the type of request I have to make, thank you.

But the specific help regarding MsgBox:

"Returned values:

Constant, Value, Description
vbOK, 1, OK
vbCancel, 2, Cancel
vbAbort, 3, Abort
vbRetry, 4, Retry
vbIgnore, 5, Ignore
vbYes, 6, Yes
vbNo, 7, No"

I thought I needed to retrieve an integer in myChoice...

But if not, that's fine, I can work with your suggestion.

Thank you very much,

Code Jack
0
pijaku Posted messages 13513 Registration date   Status Modérateur Last intervention   2 771
 
You can, you can...
It was just a suggestion.
Here, take this test: 
Dim result As Integer result = MsgBox("click", vbYesNoCancel) MsgBox result

returns 6 when you click "yes", 7 when you click "no" and 2 when you click "cancel"
It's up to you!!!
-1
Code Jack Posted messages 18 Status Membre 7
 
This is interesting, though!

You store two different things depending on how you introduce your variable in your two examples.
MsgBox seems to return both string and integer, depending on where we store it... Strange

Thank you very much nonetheless!

Code Jack
0
pijaku Posted messages 13513 Registration date   Status Modérateur Last intervention   2 771
 
What you raise is even more interesting to me because I've never asked myself the question and I've just realized that... I was completely wrong!!!!
MsgBox always returns an Integer... vbYes, for example, is a VBA constant equal to 6.
The mistake I've been making all along is automatically handled by VBA...
Dim result As String while actually result = 6 is processed automatically (I read it somewhere but where...???).
Sources: MsgBox
0
Code Jack Posted messages 18 Status Membre 7
 
Well there you go, mystery solved ;) !

Code Jack
0