• DİKKAT

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

sayfayla beraber kayan butonlar

Katılım
17 Eylül 2005
Mesajlar
156
Excel Vers. ve Dili
Office 2003 - Türkçe
Arkadaşlar Merhaba, Uzun listelerin olduğu bir çalışma sayfam var. Bu çalışma sayfasında sol tarafda bir kaç adet boton var Sayfayı aşağı kaydırdığımda butonlar sayfanın yukarısında kaldığı için normal olarak görünmüyor. Acaba bu butonlar sayfayla birlikte aşağı otomatik kayabilirmi. Hani web sitelerinde oluyor ya bazen sayfa aşağı sürüklendikçe yandaki butonlarda kendiliğinden aşağı doğru sürükleniyor.
 
Mantıken şöyle birşey olabilir ama hangi kodlarla nasıl yapılabilir bilmiyorum, eminim moderatör arkadaşlar üstesinden gelecektir.
Her nesnenin belli koordinatları vardır. Bu koordinatları scroolbar'a bağladıklarında (ilişkilendirilince) butonlar scroolbar ile beraber hareket edecektir. Benim mantığım bunları söylüyor, ama mantığımda bir hata var mı bilemiyorum, inşaallah sorunun çözülür.
 
Bu kodu kendinize göre ayarlayınız.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
CommandButton1.Top = ActiveCell.Rows(1 - 1).Top
End Sub
 
Ekteki örneği inceleyin.
 
Geri
Üst