Selectable Text in VBA Message Box - vba

Question

When I create a msgbox in VBA, the user cannot interact with the text at all. In my case, I want the user to be able to highlight and copy the text. I'm thinking the better way to do this may be to add a button that copies the text to the clipboard. Any suggestions?

Answer 1

For this code:
msgbox "Does Control+C work on a lowly, old message box?"
you can press ctrl + c, open notepad, ctrl + v and you will get this:
---------------------------
Microsoft Excel
---------------------------
Does Control+C work on a lowly, old message box?
---------------------------
OK
---------------------------

Answer 2

You can use an inputbox instead of a message box
inputbox "Copy the below text", "Copy Text", "Text value"
inputbox copy text

Answer 3

If you want text that is "selectable" then don't use MsgBox. Use a Custom form and instead of a label use a textbox. However...
Change these properties of the textbox in design mode.
SpecialEffect - fmiSpecialEffectFlat
BackStyle - Transparent
Locked - True
And then use this code
Option Explicit
Private Sub UserForm_Initialize()
Me.Caption = "Message Box"
TextBox1.Text = "Hello World!"
End Sub

Answer 4

You could use VBA to set the clipboard text if the user typically would copy the entire message.
Or use input box instead of msgbox, since the user can copy from the populated value.

Answer 5

You could make your own custom message box using a UserForm. Here's a rudimentary proof-of-concept: a userform with one text box (from which you can select and copy text).
Sub MyMsg(msg As String)
With MsgUserForm ' this is the name I gave to the userform
.TextBox1.Text = msg
.Show
End With
End Sub
Usage:
MyMsg "General failure reading hard drive."