runtime error 424

[Apple1]

Using Excel 2013.

I have a runtime error 424, and the code will stop at the IF line. What is wrong with the code?

Sub test ()
Option explicit
dim ThisPeriod , LastPeriod as string

ThisPeriod = Range("B3")



LastPeriod = Range("B6")


If Left(ThisPeriod, 1).Text = "S" And Left(LastPeriod, 1).Text = "J" Then

Do some actions


Else

Do some actions



End If

End Sub

 

[MrIfOnly]

Try this:

Option Explicit
Sub test()
Dim ThisPeriod As String, LastPeriod As String
ThisPeriod = Range("B3").Text
LastPeriod = Range("B6").Text
If Left(ThisPeriod, 1) = "S" And Left(LastPeriod, 1) = "J" Then
MsgBox "yes"
Else
MsgBox "no"
End If
End Sub

Regards,

CJ