1: 2: 3: 4:
'Espera para que a página carregue. Fazer quando myIE.Busy ou myIE.ReadyState <> 4 DoEvents Laço