IF AND statement syntax

Hi Guys,

Having trouble to find the correct syntax to do a if and statement. Criteria should be: if sheetname = this and activecell is blank

If(and(ActiveSheet.Name = "User Profile", active.cell = "")) Then

dothis

else 

dothisinstead

End if

Thanks for your help if you have the answer.

Regards, James.