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