Substitua as referências externas em uma tabela do Excel por valores - usando uma macro

Anonim

Descubra aqui como você pode converter referências externas em valores fixos no Excel.

As referências externas são úteis porque você pode usá-las para estruturar seus dados. No entanto, se você distribuir pastas de trabalho com referências externas individualmente, os usuários receberão uma mensagem de erro informando que a fonte referenciada não pode ser encontrada.

Em vez de converter as referências individualmente ou em grupos em valores independentes, você também pode fazer isso usando uma macro. A macro a seguir substitui todas as referências externas e, em vez disso, insere o conteúdo atual como valores absolutos nas células correspondentes:

Sub LinksReplace ()

Dim Cell As Range For Each Cell In ActiveSheet.

UsedRange.

Células If InStr (Cell.Formula, "[")> 0 E InStr (Cell.Formula, "]")> 0 Then Cell.Formula = Cell.

Valor próxima célula

End Sub

Todas as referências externas na tabela atual (ActiveSheet) são substituídas por valores absolutos. Para fazer isso, a macro verifica se os caracteres "[" e "]" aparecem nas fórmulas de todas as células usadas na tabela. Este é sempre um indicador de referências externas. Se a condição for atendida, a fórmula na célula correspondente será substituída pelo valor atual da célula.