meine Exceldatei will beim Öffnen immer eine autom. Verknüpfung aktualisieren, die ich nicht kenne. Wie kann ich diese finden und entfernen.
MfG Thomas
meine Exceldatei will beim Öffnen immer eine autom. Verknüpfung aktualisieren, die ich nicht kenne. Wie kann ich diese finden und entfernen.
MfG Thomas
schaue mal in die Recherche, da wirst Du fündig.
Gruß Hajo
Oder lasse mal folgenden Code von Hajo laufen:
Sub Verknüpfungen_löschen()
Dim c As Range
Dim frage
' ****
' Ergänzung Hajo
On Error GoTo Fehler1
' *****
For Each c In ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas)
If InStr(1, UCase(c.Formula), "XLS]") <> 0 Then
' c.Select
frage = MsgBox("Soll der Wert der Zelle" & Chr(13) _
& Chr(9) & c.Address & Chr(9) & c.FormulaLocal & Chr(13) _
& "als Zellwert eingetragen werden?" & Chr(13) & Chr(13) _
& "Bei ""Nein"" wird der Zellinhalt gelöscht", vbYesNo, _
"Verknüpfung als Wert schreiben?")
If frage = vbYes Then
c.Value = c.Text
Else
c.Value = ""
End If
End If
Next
' ****
' Ergänzung Hajo
Exit Sub
Fehler1:
MsgBox "Es sind keine Verknüpfungen vorhanden" & Chr(13) _
& "Schauen Sie mal unter Einfügen, Namen, Namen Definieren"
End Sub
hat geholfen.
MfG Thomas