Soru Dinamik Köprü Yolu

Katılım
10 Ekim 2013
Mesajlar
424
Excel Vers. ve Dili
Excel 2013 (64bit) - Türkçe
Altın Üyelik Bitiş Tarihi
26/05/2022
Merhabalar..
Kendi çapımda excel programları hazırlıyorum. Ekseriyetle hesap programları oluyor bunlar. Bazı hesaplarım 40-50 sayfa olabiliyor. Bu nedenle excel içinde hızlı dolaşım için MENU ekliyorum. Basitçe belirli excel içinde belirli çalışma sayfalarının belirli hücrelerine köprü atıyorum yani.

Ancak özellikle o çalışma sayfasının ismi değiştiğinde tüm köprülerim çöp oluyor. Acaba köprülerin adreslerini (hücre yolu değişmeden) sayfa tabı ismine bağlamak mümkün mü? Sayfanın ismi değişirse köprü linki de otomatik değişse muhteşem olmaz mıydı?

Umarım sormaya çalıştığım şeyi yeterince basit bir şekilde anlatabilmişimdir :D


EDIT: Bir de örnek dosya ekleyeyim dedim.
 

Ekli dosyalar

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,181
Excel Vers. ve Dili
Excel-2003 Türkçe
Merhaba;

sayfanın kod bölümüne;

Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
On Error Resume Next
Range("a1:a65536").ClearContents
For i = 1 To ActiveWorkbook.Sheets.Count
Cells(i, 1).Value = Sheets(i).Name
ActiveSheet.Hyperlinks.Add Anchor:=Range("A" & i), Address:="", SubAddress:= _
"'" & Range("A" & i).Value & "'!A1"
Next i
End Sub

Kodlarını ekleyin.
Böylece sayfaya her girişte A1 den itibaren sayfa isimlerini yazar ve köprü oluşturur.
İyi çalışmalar.
 

Cengiz Demir

Altın Üye
Katılım
29 Haziran 2018
Mesajlar
604
Excel Vers. ve Dili
Office 365 TR (32 Bit)
Altın Üyelik Bitiş Tarihi
05-04-2025
Ad tanımlama yapıp. Köprüleri bu adlara göre oluşturursanız sayfa ismini değiştirseniz de köprü bozulmayacaktır.

Örneğin Sayfa1 A1 hücresine sağ klikleyip Ad tanımla seçip. İstediğiniz isimle adı tanımlayın. Daha sonra Sayfa5 de köprü/yer işareti oluştururken bu adı seçin.
:)
 
Katılım
10 Ekim 2013
Mesajlar
424
Excel Vers. ve Dili
Excel 2013 (64bit) - Türkçe
Altın Üyelik Bitiş Tarihi
26/05/2022
Çok teşekkürler değerli öneriler için.
Sanırım ad tanımlama işimi fazlasıyla çözecektir.
 

Cengiz Demir

Altın Üye
Katılım
29 Haziran 2018
Mesajlar
604
Excel Vers. ve Dili
Office 365 TR (32 Bit)
Altın Üyelik Bitiş Tarihi
05-04-2025
Rica ederim :)
 
Üst