Molto probabilmente dipende da cosa fai esattamente in

Private Sub IEst_DocumentComplete(ByVal pDisp As Object, URL As Variant)

ma dato che non lo mostri non so cosa dirti ...