Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Alle externen Links löschen und in Werte umwandeln

Gruppe

Extern

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