You could run something like this and attach it to a button on your sheet. This will unprotect the sheet, check the spelling and then protect the sheet again.
Dim myRng As Range
Dim mySht As Worksheet
Set myRng = Sheets("Sheet1").Range("A1:A20")
Set mySht = Sheets("Sheet1")