Excel 2007 - Verknüpfungen löschen

04/03/2010 - 15:27 von Walter Heying | Report spam
Hallo,

und wieder einmal habe ich eine Sache bei der ich nicht weiterkomme.
Ich habe Verknüpfungen in einer Datei zu Blàttern hin, die gelöscht
wurden. Wie kann heraus bekommen, in welchen Zellen diese
Verknüpfungen stehen?

Gruß
Walter
 

Lesen sie die antworten

#1 Andreas Killer
05/03/2010 - 12:29 | Warnen spam
On 4 Mrz., 15:27, Walter Heying wrote:

Ich habe Verknüpfungen in einer Datei zu Blàttern hin, die gelöscht
wurden. Wie kann heraus bekommen, in welchen Zellen diese
Verknüpfungen stehen?


Durchlaufe alle Zellen und kuck nach ob #BEZUG! in der Formel drin
steht.

Das angehàngte Makro markiert alle diese Zellen, kannst aber auch
einfach nach #BEZUG! in Formeln suchen.

Andreas.

Sub Test()
Dim R As Range, S As String, E As Range
'Durchlaufe alle benutzen Zellen
For Each R In ActiveSheet.UsedRange
'Ist ein Fehler und eine Formel drin?
If IsError(R) And R.HasFormula Then
'Referenzfehler?
If InStr(1, R.FormulaLocal, "#BEZUG!", vbTextCompare) > 0 Then
'Ja, gefundene Zellen vereinigen
If E Is Nothing Then
Set E = R
Else
Set E = Union(R, E)
End If
End If
End If
Next
'Was gefunden?
If E Is Nothing Then
'Nö
MsgBox "Keine Fehler gefunden"
Else
'Jupp, alle markieren
E.Select
End If
End Sub

Ähnliche fragen