Sub msgboxfromothersheet()
MsgBox "Your score is " & sheets("Calculations").Range("G2")
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Chris" wrote in message
...
Hi - I need to set up a message box that will read a cell on another
worksheet. The button for the msgbox (an where I want it to pop up) is on
the Questions worsheet. The code I have is below;

Sub Message()
Dim txtScore As String

txtScore = Worksheet("Calculations").Range("G2").Select

MsgBox "Your Score is", vbInformation & txtMaturityScore, "Risk Score"

End Sub