Página 1 de 1

Macro para atualizar dados

Enviado: 17 Mar 2017 às 11:59
por gilbertjuniors
Pessoal, bom dia.

Me pediram para criar um botão que abra a opção de valores antigos / valores atuais.
Os valores antigos já estão carregados na planilha e caso precise dos valores atuais teria que verificar nas planilhas externas e na internet (links externo).

Pensei numa macro que percorra todas as referencias externas e vá atualizando.

Até gravei uma macro porém, quero automatizar o processo para caso seja modificado um link, tirado ou acrescentado, este botão continue a encontrar o link de dados externo e atualizar os valores respectivos.


Alguém sabe qual método no VBA posso utilizar para listar todos os links externos de dados?

Re: Macro para atualizar dados

Enviado: 19 Mar 2017 às 14:56
por alexandrevba
Boa tarde!!

Veja se ajuda.
Código: Selecionar todos
Sub ListLinks()
'Updateby20140529
'Fonte: https://www.extendoffice.com/documents/excel/953-excel-list-all-links.html
Dim wb As Workbook
Set wb = Application.ActiveWorkbook
If Not IsEmpty(wb.LinkSources(xlExcelLinks)) Then
    wb.Sheets.Add
    xIndex = 1
    For Each link In wb.LinkSources(xlExcelLinks)
        Application.ActiveSheet.Cells(xIndex, 1).Value = link
        xIndex = xIndex + 1
    Next link
End If
End Sub
Att