Just can't figure this out

[EVR_99]

Sub Week1()
'
' Week1 Macro
'
'
Range("D32:F33").Select
Application.Run "NewPts"
If "(d32+e32+F32).formula<>(d33+e33+f33).formula" Then
End If
ElseIf "(d32+e32+F32).formula=(d33+e33+f33).formula" Then
Range("G32,G33").Select
Application.Run "OT"
ElseIf "(d32+e32+f32+g32).formula=(d33+e33+f33+g33).formula" Then
Range("G32,G33").Select
Application.Run "OT"
ElseIf "(d32+e32+f32+g32).formula<>(d33+e33+f33+g33).formula" Then
End If

Range("E30").Select

End Sub

Thanks,
David

 

[Weaver]

I think the problem is your use of quotation marks

If "(d32+e32+F32).formula<>(d33+e33+f33).formula" Then

all this is doing is

if (a string variable) then

which makes no sense, as a string variable can't be true/false

I think what you may need to to is describe in words what it is you're trying to do so that we may derive the correct approach from first principles.

HTH