VBA: How dan I insert CRLF into strings?

VBA: How dan I insert CRLF into strings?

I'd like to insert new lines into strings which should be displayed with msgbox function. I haven't found anything, the constants vbcrlf or vbNewLine don't work. My goal is, to generate a message based on the sheet content which can be copy&pasted into an e-mail or something else outside Zoho. It works great but I need CRLFs. 

Example:

dim message as string
message = "Line 1" & vbCrLf & "Line 2" & vbCrLf & "Line 3" 
msgbox message
range("TextForCopyAndPaste").Value=message