VBA - Unable to get CountIf property of the WorksheetFunction class (ERROR 1004)

Question

Below is a macro which I use at work and stopped working last week. The error generates on the line qtd_op = qtd_op + Application.WorksheetFunction.CountIf(ws_dados.R