[RESOLVED] IF Clause - syntx error

[india123]

what is the syntax error below
If Ucase(aSheet.Cells(4."e")).value = "ABCD" AND if aSheet.Cells(i,"d") <> "" And dic.Exists((aSheet.Cells(i,"d")) then
MsgBox ("ABCD ORG NOT CONSISTENT" )
Exit Sub

End if