Sayfa değiştirme menüsü oluşturmak istiyorum

[KARTAL06]

Private Sub UserForm_Activate()
For s = 1 To Sheets.Count
Me.ListBox1.AddItem Sheets(s).Name
Next
End Sub

burada hata veriyor

 

[gezgin-49]

dosyanızın küçük bir kısmını da gönderebilirseniz probleminiz daha kolay çözüleceğe benziyor.

 

[uzmanamele]

merhaba
userformun üzerinde ListBox var mı?

 

[KARTAL06]

hayır

nasıl yapacağız?

 

[KARTAL06]

tamam şimdi tek sorun kaldı

Düğme her sayfada görünmüyor.

 

[uzmanamele]

Düğme her sayfada görünmüyor.

merhaba
her sayfada görünmemesi normal.
çünkü nereye isterseniz oraya kopyalamanız gerekiyor, kendi kendine gitmezki.

 

[KARTAL06]

Tamam

merhaba
her sayfada görünmemesi normal.
çünkü nereye isterseniz oraya kopyalamanız gerekiyor, kendi kendine gitmezki.

Şimdi oldu herşey çalışıyor. Teşekkür ederim.

 

[uzmanamele]

merhaba
güle güle kullanın.
merak ettim; çiçek mi kullandınız böcek mi?

alternatif olsun

 

[KARTAL06]

Nasıl olsa ögrendim

Kodu yazamasamda mantığını çözdüm sayılır. Artık siz ne isterseniz onu kullanalım. Mesele şekli değil çalışması. Teşekkürler.

 

[Korhan Ayhan]

Selamlar,

Alternatif olarak ekteki örnek dosyayı incelermisiniz. Excel Yardım menüsünün yanına SAYFALAR adında bir menü oluşur. Bu menüden istediğiniz sayfaya ulaşabilirsiniz.

 

[KARTAL06]

Teşekkürler

Buda çok güzel.

 

[uzmanamele]

merhaba
syn Korhan Ayhan'ın alternatifi daha iyi, menü çubuğunda kimseyi rahatsız etmeden duruyor.
50-100 sayfalık çalışma kitabında aranan sayfayı bulmak zor olabilir ama aslında hiç kod yazmaya gerek yok.
sayfa sekmelerinin solundaki ok tuşlarını sağ tıklayın, çıkan pencereden istediğiniz sayfayı seçin.

 

[ridvan2111]

başka bir çözüm

selam
umarım işinize yarar

 

[ZİNDAN]

Zamanında çok uğraşlar vererek böyle bir şey yapmıştım, sizlerinde beğenisine sunmuştum ama, kimse yorum yapmadığına göre beğenen olmamıştı.

Bi bakın isterseniz belki sorununuzun çözümünde işe yarar.

http://www.excel.web.tr/showthread.php?t=51590

 

[Korhan Ayhan]

Selamlar,

Arkadaşlar silinen dosya #30 nolu mesaja tekrar eklenmiştir.

 

[cimbom05]

İyi günler,
Aslında bu konuda farklı bir işlem daha var.
Sayfa sekmelerinin altında sol tarafta bulunan okların üzerinde iken mouse'un sağ tuşuna basarsanız sayfa listesi açılır. Buradan da seçebilirsiniz.

 

[ZİNDAN]

Selamlar,

Alternatif olarak ekteki örnek dosyayı incelermisiniz. Excel Yardım menüsünün yanına SAYFALAR adında bir menü oluşur. Bu menüden istediğiniz sayfaya ulaşabilirsiniz.

Sayın Korhan Ayhan örnek için teşekkürler.
Gerçekten çok pratik.