Thema: Alle externen Links löschen und in Werte umwandeln

StandardModule: Modul1

Sub Link2Value()
   Dim rng As Range
   For Each rng In ActiveSheet.UsedRange.Cells
      If rng.HasFormula Then
         If InStr(rng.Formula, "\[") Then
            rng.Value = rng.Value
         End If
      End If
   Next rng
End Sub

Beiträge aus dem Excel-Forum zu den Themen Link und Extern