Sub Ent1()
Dim IsItFS As String
Dim P1NS As String
Dim P1WG As String
Dim GS As String
IsItFS = Range("CH73").Text
P1NS = Range("CI73").Text
P1WG = Range("CJ73").Text
GS = Range("CK73").Text
If IsItFS = "1stSet" And P1NoS = "NoSe" And P1Ga = "W" Then
MsgBox ("Pass")
Else
MsgBox ("Fail")
End If
End Sub
This code is outputting "Fail" in the message box when it should output "Pass" as the 3 IF's asked are true. Have I got the syntax wrong on the IF and AND part of this code?
Dim IsItFS As String
Dim P1NS As String
Dim P1WG As String
Dim GS As String
IsItFS = Range("CH73").Text
P1NS = Range("CI73").Text
P1WG = Range("CJ73").Text
GS = Range("CK73").Text
If IsItFS = "1stSet" And P1NoS = "NoSe" And P1Ga = "W" Then
MsgBox ("Pass")
Else
MsgBox ("Fail")
End If
End Sub
This code is outputting "Fail" in the message box when it should output "Pass" as the 3 IF's asked are true. Have I got the syntax wrong on the IF and AND part of this code?