VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Alle externen Links löschen und in Werte umwandeln

Gruppe

Link

Bereich

Extern

Thema

Alle externen Links löschen und in Werte umwandeln

Problem

Alle externen Links sollen gelöscht und deren Werte übernommen werden.

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.




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