Macro dando erro em tempo de execução '13'

[Nelson Cruz]

Pessoal estou com um problema ao rodar uma macro, a macro já está feita. porem toda vez que eu coloco ela para rodar ela para em algum momento dando erro no tempo de execução. porem se fecho e abro de novo ela da erro em outro registro. não é um erro especifico por erro na programação.

alguém sabe o que pode ser isso??

[Nelson Cruz]

O erro está dando nessa parte do codigo.

Dim varData       As Datetime

            varData = sess0.Screen.GetString(20, 32, 2) & "/" & sess0.Screen.GetString(20, 37, 2) & "/" & sess0.Screen.GetString(20, 42, 4)
            If CDate(varData) >= CDate(rsC("DataAgend")) Then
                rsC.Edit
                rsC("Data") = varData
                rsC.Update
                rsC.Edit
                rsC("Contrato") = sess0.Screen.GetString(4, 32, 32)
                rsC.Update