Excel VisualBasic Script

Sub text()
    MsgBox Worksheets("Sheet1").range("A1").text
    MsgBox Worksheets("Sheet1").range("A1").value
End Sub