Experimente contar diretamente no banco.
Seria +/- assim:

    Sql = " SELECT Count(Atualizador)as Total_Atualizador FROM Cadastro "
    Sql = Sql & " WHERE Atualizador = '" & Me.atualizador.Text & "'"
       
    cx.Conectar

    With banco
        .CursorType = adOpenKeyset
        .CursorLocation = adUseClient
        .Source = Sql
        .ActiveConnection = cx.Conn
        .Open
    End With
' cria o recordset com os dados
    Set ors = New ADODB.Recordset
    ors.Open cx, , adOpenKeyset, adLockOptimistic

    Me.totalreg.Text = ors.field(1)
    cx.Desconectar

Caro Reinaldo, tudo bem?

Obrigado por responder;

Tive dificuldade para entender sua sugestão e não consegui evoluir por ela. O que seria Total_Atualizador? Uma variável? Se sim, onde seria usada?

Consegui resolver de outra forma e com auxílio desse tutorial muito bom;

No meu caso mantive os parametros de consulta da sql, a configuração do recordset e utilizei o método MoveLast e depois AbsolutePosition;

Com isso localizei o último registro de acordo com os parametros informados;

At

Total_Atualizador foi o nome "dado" ao campo de contagem do registro Atualizador, caso contrario o sql obteria um nome tipo countofAtualizador ou algo parecido
Na verdade não me atentei ao titulo, mas sim ao código, onde era contado numero de registros ("Cont = Cont + 1"), e minha sugestão era contar diretamente.