Solução Sub URLTest() Dim rngURL As Range 'Loop through each used cell in column A on sheet URLs For Each rngURL In Worksheets(...

Muito obrigado a todos pela atenção. Para esse problema, acabei abaixando um web crawler (iMacros) para abaixar as páginas.

Boa tarde, Bernardo. Muito obrigada pelo pronto atendimento. Depois de trocar a fonte do meu computador e estudar o VBA do arquivo Manteiga, consegui ...

Obrigada a todos por prontamente terem respondido a questão, mas gostaria que o Excel carregasse o relatório completo, com 121 linhas, conforme o anex...