• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

çalışma sayfası çokluğu

Katılım
5 Eylül 2007
Mesajlar
1,247
Excel Vers. ve Dili
ofis 2010
bir çalışma kitabım var , yaklaşık 30 çalışma sayfası var, her çalışma sayfasına bilgi girişi yapmam gerekiyor, ulaşım pratik olmuyor. ana sayfaya çalışma sayfalarına bağlantı oluşturdum ama pek pratik olmuyor, makrosuz daha kolay bir çözümü olabilir mi.
 
. . .

Tablonun sol alt köşesinde sağ tıklayarak sayfa listesinin açılmasını sağlayabilirsiniz.

14570760711.png

. . .
14570761281.png


. . .
 
Merhaba;
Aynı çalışma kitabında Sayfa1 in herhangi bir yerine sayfa2, sayfa3, sayfa4... ün kısa yolu koyabiliyormuyuz? Tıklayınca o sayfaya gitsin
 
Köprü yöntemini deneyebilirsiniz.
 
Merhaba;
Aynı çalışma kitabında Sayfa1 in herhangi bir yerine sayfa2, sayfa3, sayfa4... ün kısa yolu koyabiliyormuyuz? Tıklayınca o sayfaya gitsin
. . .

Kod:
Sub kod()
    With Range("A1:A100")
        .Hyperlinks.Delete
        .ClearContents
    End With
    
    say = 1
    For i = 1 To Sheets.Count
        If Sheets(i).Name <> "Sayfa1" Then
            ActiveSheet.Hyperlinks.Add Anchor:=Cells(say, "A"), Address:="", _
            SubAddress:=Sheets(i).Name & "!A1", TextToDisplay:=Sheets(i).Name
            say = say + 1
        End If
    Next i
End Sub

. . .
 
Köprü yöntemiyle çözdüm. Teşekkürler
Ancak Köprünün üzerine görsellik yapmak istiyorum NASIL YAPARIM??
 
Geri
Üst