1: 2: 3: 4:
'Espera para que la página cargue. Hacer mientras que myIE.Busy o myIE.ReadyState <> 4 DoEvents Lazo