likleri nasıl görebilirm

[gurbuzs]

sürekli bilgi girdiğim çok satırlı uzun bi excel sayfam var..
sanırım kopyalama aşamasında hata yaptım..
şimdi her açılışta diğer dosyalara link var güncellemek ister misiniz diye soruyor.
ama sayfada link yok en azından olmaması lazım.
satır satır aradım ama bulamadım ve satır sayısı çok fazla çok zor oluyor..
nereye link olduğunu nasıl görebilirim kısa yolu var mıdır..?

 

[uzmanamele]

merhaba

düzen / bağlantılar şeklinde hangi kitaba başvuru yaptıpını görebilirsiniz.
bu size başvuru kaynağını gösterin, başvuru nerdedir göstermez.

araçlar / seçenekler / görünüm / formüller şeklinde denerseniz her hücredeki formülü görebilir, buna göre varsa dış bağlantıları denetleyebilirsiniz.

aşağıdaki konu bir modüle yazıp kodu çalıştırırsanız bağlantıların hangi hücrede olduğunu görebilirsiniz.

Sub ExRef()
Dim MyRange As Range
Dim i As Integer, j As Integer, No As Integer
Dim MyMsg1 As String, MyMsg2 As String, MyMsg3 As String
Dim MyArray()
For i = 1 To Worksheets.Count
No = 0
For Each MyRange In Sheets(i).UsedRange
If InStr(1, MyRange.Formula, "[") Then
MyRange.Interior.ColorIndex = 6
No = No + 1
ReDim MyArray(1 To No)
MyArray(No) = Sheets(i).Name & " --- " & MyRange.Address(False, False)
For j = LBound(MyArray) To UBound(MyArray)
If MyArray(j) <> "" Then MyMsg2 = MyMsg2 & vbCrLf & MyArray(j)
Next
End If
Next
MyMsg1 = MyMsg1 & vbCrLf & Sheets(i).Name & " sayfasında " & No & " adet "
Next
MyMsg3 = "(Bulunan hücreler sarı renkle işaretlenmiştir.)"
MsgBox MyMsg1 & vbCrLf & WorksheetFunction.Rept("--", 20) & vbCrLf & "Dış bağlantılı hücre bulundu." _
& vbCrLf & vbCrLf & "Bulunan hücreler :" & vbCrLf & MyMsg2 _
& vbCrLf & vbCrLf & MyMsg3, , "Rapor !"
End Sub

 

[gurbuzs]

spersin diyorum başka da bişi demiyorum..
çok saol

 

[baydeniro]

Aradan bayağı zaman geçmiş, ancak ben de çok teşekkür ederim.