Hareketli Butonlar

[ismailayan]

Arkadaşlar Herkese kolay gelsin...

Benim 73 sayfalık bir excel sayfam var ve 3 tane makro görevlendirilmiş butonum var.

yalnız en 73 sayfada düğmeye basmak için en başa dönmek zorundayım
bu konuda bana yardımcı olurmusunuz???

herkese kolay gelsin

 

[mehmett]

Sn ismailayan,

Ekte gönderdiğim dosyada bir örnek var.

 

[ismailayan]

size durumu yanlış anlattım galiba

benim istediğim...

sayfayı aşağı kaydırdıkca butonlarında aşağı kayması


bu şekilde bana yardımcı olursanız sevinirim..

 

[class37]

Merhaba


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Shapes("düğme 1").Top = ActiveCell.Offset(1, 1).Rows.Top
ActiveSheet.Shapes("düğme 1").Left = ActiveCell.Offset(1, 1).Rows.Left
End Sub

 

[ismailayan]

peki 3 tane button için kod nasıl olacak

ben yapmaya çalıştım ama
bir türlü kendime uyarlayamadım.

 

[class37]

Merhaba
Butonlarınızı userform üzerine yerleştirin yani işlemleri UserForm üzerindeki butonlarla yapın gezinen düğme ile Userformu açın.Zaten üç tane düğme ile sayfada gezinmek zor olur. İyiçalışmalar.

 

[Seyit Tiken]

Butonlarınızı, Excel sayfasının en tepesine(Dosya-Düzen.....gibi) yerleştirip bu sıkıntıdan kurtulabilirsin. Fazla kodlara gerek kalmayacak.