Can someone please help me translate the following worksheet function for use in VBA?

=COUNTIFS(sheet1!$B53:$B2031,"*x*",sheet1!$C53:$C2031,$A2,sheet1!$E$47:$E$2025,"final*")

Thanks,

Willardio