My attempt was this but nothing happens!

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If .Range("T10").Value = "Error" Then
MsgBox "You have not entered the correct Opening value, please
review and re-enter (see previous days closing value)"

Sheets("Figures").Select
Range("B5").Select

Exit Sub
End If

End Sub