Sekme sayfaları Hk.

[sensizsoldum]

Merhaba,
Sadece bir çalışma için sekme sayfalarını gizlemek istiyorum. Çalışmada ki sayfalara, köprü ile ulaşmak istiyorum. böyle bir şey mümkün mü ? ve nasıl yapabilirim.

 

[asi_kral]

Merhaba
Örnek dosya ekler misiniz ?
Ne yapmak istediğinizi detaylı anlatırsanız yardımcı olabilirim.

 

[sensizsoldum]

Merhaba,
Örnek ekleyemiyorum. Şöyle ki bir çalışmam var.

Şimdilik 10 sayfalık ilerleyen zamanda, yaklaşık 25 sayfa kadar olacak bir çalışma için Ana sayfa oluşturdum. Bu Ana sayfa dan diğer sayfalara geçiş için köprü bağlantısı ekledim.
sayfalara bu köprü ile erişmek istiyorum. Excelin altında bulunan sayfa 1 sayfa2 sayfa 3 olan çubuğu sadece bu excel çalışması için gizlemek istiyorum.

Böyle bir şey mümkün olabilir mi.

 

[asi_kral]

Merhaba
Bu kodu thisworkbook bölümüne kopyalayın ve deneyin.

Private Sub Workbook_Deactivate()
Dim SAY As Long
For SAY = 1 To Sheets.Count
If Sheets(SAY).Name <> "Anasayfa" Then
Sheets(SAY).Visible = True
End If: Next
End Sub
Private Sub Workbook_Open()
Dim SAY As Long
For SAY = 1 To Sheets.Count
If Sheets(SAY).Name <> "Anasayfa" Then
Sheets(SAY).Visible = False
End If: Next
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If ActiveSheet.Name = "Anasayfa" Then
If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
Sheets(ActiveCell.Text).Visible = True
Sheets(ActiveCell.Text).Select
End If
End Sub

 

[sensizsoldum]

Merhaba, Teşekkür ediyorum ilginiz için,
Sayfalar gizlendi ama Köprü kurduğum sayfalara gidemiyorum. Manuel olarak gizlediğimde de böyle bir durumla karşılaşıyordum.

 

[asi_kral]

Merhaba, Teşekkür ediyorum ilginiz için,
Sayfalar gizlendi ama Köprü kurduğum sayfalara gidemiyorum. Manuel olarak gizlediğimde de böyle bir durumla karşılaşıyordum.

Gizli sayfayı önce aktif etmelisiniz ?
Ondan dolayı
Anasayfanın - A sütununa sayfa isimlerini yazın ve seçtiğinizde o sayfaya gideceksiniz.

 

[sensizsoldum]

Anladım fakat ama sayfa linkleri farklı hücrelerde bunu bu Ana Sayfa için uyarlaya bilir miyiz.
Yeniden sayfalarda eklenebilir durumda.

 

[asi_kral]

Ben sizden örnek dosya isterken bundan bahsediyordum

 

[sensizsoldum]

VIP Üyeliğim bitmiş dilerseniz uzak bağlantı yapabiliriz.

 

[asi_kral]

Kusura bakmayın. Benden bu kadar.

 

[sensizsoldum]

Teşekkür ederim elinize sağlık iyi çalışmalar dilerim.