How to Show Several Lines in MsgBox

[Gos-C]

Hi all,

Can someone please help me with the following code. I need to include the additional lines in the MsgBox.

Sub GetSampleSize()
Dim sSize As String

ThisWorkbook.FollowHyperlink Address:="http://www.raosoft.com/samplesize.html", NewWindow:=True
MsgBox "Enter the following numbers"

'I need to include the following lines in the message:
'
'    What margin of error can you accept?     2
'    What confidence level do you need?     95
'    What is the population size?    [Show value of cell EI1]
'    What is the response distribution?     2


    sSize = Application.InputBox(Prompt:="Please enter the number shown in the Sample Size Calculator for 'Your recommended sample size is'", _
          Title:="ENTER SAMPLE SIZE", Type:=1)
If sSize = vbNullString Then

           Exit Sub
End If

Range("EK1").Value = sSize

End Sub

Thank you,
Gos-C

 

[Ron Coderre]

Maybe this kind of structure...

Sub MsgBoxTextDemo()
Dim MyText As String
MyText = "Enter the following numbers" & vbCr _
    & "    What margin of error can you accept?     2" & vbCr _
    & "    What confidence level do you need?     95" & vbCr _
    & "    What is the population size?    " & Range("I1").Value & vbCr _
    & "    What is the response distribution?     2"
MsgBox MyText
End Sub

Does that help?

 

[Gos-C]

Yes, that works. Thank you very much, Ron.

cheers,
Gos-C

 

[Gos-C]

I would like to have the texts aligned left and the numbers aligned right.

Can anyone help, please?

Gos-C

 

[Kenneth Hobson]

Sub MsgBoxTextDemo()
  Dim MyText As String
  MyText = "Enter the following numbers" & vbLf & _
      "What margin of error can you accept?" & vbTab & 2 & vbLf & _
      "What confidence level do you need?" & vbTab & 95 & vbLf & _
      "What is the population size?" & vbTab & Range("I1").Value & vbLf & _
      "What is the response distribution?" & vbTab & 2
  MsgBox MyText
End Sub

 

[Ron Coderre]

I would like to have the texts aligned left and the numbers aligned right.

Can anyone help, please?

Gos-C

Since message boxes use a proportional font, you'll face the same problem you'd face to get the numbers to align properly in a cell:
Experiment with tabs, spaces, other characters, etc. until the output "looks" right.

 

[Gos-C]

Thank you, Kenneth and Ron. So, not even spaces can push them to the right. Right?

 

[Kenneth Hobson]

If you want more control, use a Userform.

 

[Gos-C]

OK . . . thank you, Kenneth. I will probably keep it as is.

Gos-c