Excelde açılan kutu makro bağlantısı

[arimuz]

Selamun aleylüm. Excel çalışmaya yeni başladım. Bir açılan kutum var. İçerisinde sayfa 2 ve sayfa 3 yazıyor. Ben ikisine de ayrı ayrı gitmesini istiyorum. Makro kullanınca sadce bir sayfaya yönlendirebiliyorum Nasıl yapabilirim? Teşekkür ederim.
kaynak dosyam aşağıdadır. teşekkürler
http://rapidshare.com/files/436723165/Sorunum.xls

 

[İhsan Tank]

Selamun aleylüm. Excel çalışmaya yeni başladım. Bir açılan kutum var. İçerisinde sayfa 2 ve sayfa 3 yazıyor. Ben ikisine de ayrı ayrı gitmesini istiyorum. Makro kullanınca sadce bir sayfaya yönlendirebiliyorum Nasıl yapabilirim? Teşekkür ederim.
kaynak dosyam aşağıdadır. teşekkürler
http://rapidshare.com/files/436723165/Sorunum.xls

merhaba
öncelikle dosyalarınızı sitemize yüklerseniz daha iyi olur
dosya yüklemek için tıklayın
eki inceleyin

 

[arimuz]

hocam, yükleme alanını görmedim kusura bakmayın. Nasıl yapıldığını anlamadım. list box'da sayfa 2 ye basınca nasıl sayfa 2 ye gidecek? birde makrolarla yapmadınız mı

 

[İhsan Tank]

hocam, yükleme alanını görmedim kusura bakmayın. Nasıl yapıldığını anlamadım. list box'da sayfa 2 ye basınca nasıl sayfa 2 ye gidecek? birde makrolarla yapmadınız mı

sayfanın kod bölümüne bir baksanız.
geçmeyi bilmiyorsanız. sekmeda Sayfa1'in üzerine sağ tuş tıklayın Kod görüntüle deyin. ordaki kodu göreceksiniz.

 

[arimuz]

hocam, orayıda sayenizde düzelttim fakat; o listbox'a yeni menüleri nasıl ekleyebilirim. denetim biçimlendir menüsü yok...

 

[İhsan Tank]

hocam, orayıda sayenizde düzelttim fakat; o listbox'a yeni menüleri nasıl ekleyebilirim. denetim biçimlendir menüsü yok...

ben 2003'teki gibi anlatayım.
siz oraya bakarak verileri değiştirebilirsiniz.
tasarım modu'nu açın bu link 10. resim
sağ tuş tıklayın - özellikler - listfillRange'nin karşısına hangi hücre aralığını aralcaksanız yazın ve kapatın - tasarım modu'nu kapatın. ve ok'a tıklayın.

 

[arimuz]

hocam, Allah razı olsun, yaptığınız gerçekten hizmet. teşekkür ederim.

 

[İhsan Tank]

hocam, Allah razı olsun, yaptığınız gerçekten hizmet. teşekkür ederim.

rica ederim
asıl hizmet bu siteyi kurup bugünlere gelmesi için çok büyük çaba sarfeden Hüseyin Hocam Yapmıştır.
Kendisine ve sitede yardımcı olan bütün hocalarıma teşekkür ederim
kolay gelsin :mutlu:

 

[stattlich_yigit]

Hocam bu örnekte mesela 5 kategori olsaydı açılan kutuda her kategori için farklı sayfaya gitmek isteseydik nasıl yapardık görsel olarak anlatabilirmisiniz KODLARDAN ANLAMDIM

 

[stattlich_yigit]

Hocam mesela bu örnek 10 kategorilik olsaydı her kategori için farklı sayfaya gitmek nasıl yapılırdı örnek kodundan yapamadım görsel olarak anlatabilimisiniz rica etsem.

 

[stattlich_yigit]

...

Hocam peki bu örnek 10 kategoride olsaydı her kategori için farklı sayfaya gitmek isteseydik nasıl yapardık örneğin kodundan anlamadım görsel olarak anlatabilirmisiniz rica etsem.

 

[İhsan Tank]

Hocam peki bu örnek 10 kategoride olsaydı her kategori için farklı sayfaya gitmek isteseydik nasıl yapardık örneğin kodundan anlamadım görsel olarak anlatabilirmisiniz rica etsem.

görsel olarak değilde adım adım anlatsam olmaz mı_?
olur derseniz şu şekilde yapalım
Bir sayfanızın Adını Ansayfa Olarak değiştirin. ve 10 Tane Sayfa Ekleyin.
Anasayfa'da A Sütununa
Sayfa Adı
Sayfa1
Sayfa2
Sayfa3
Sayfa4
Sayfa5
Sayfa6
Sayfa7
Sayfa8
Sayfa9
Sayfa10
bunların yazın.
Ardından combobox Seçimi Yapacağız. Üst Sekmelerden Geliştirici sekmesine tıklayalım Komut Düğmesi ( Activex Denetimi )'ne tıklayalım ve sayfa'da çizim yaparak yerleştirin. Ardından eklediğiniz Combobox'a Sağ tuş özellikler açılan sayfadan ListFillRange Seçeneğinin Yanına

A2:A11

bunu yazalım
açılan sayfayı kapatalım - combobox'un üzerine çift tıklayalım
açılan yere

Private Sub ComboBox1_Change()
[COLOR="Red"]Worksheets(ComboBox1.Text).Select[/COLOR]
End Sub

bu kodu yapıştıralım. ( özellikle çıkan iki kod'un arasına Kırmızı yeri yapıştırmanızda yeterli olacaktır. ). kitabımızı açalım üst taraftan tasarım moduna tıklayalım. ve Çıkan Aşağıya ok İşaretine Tıklayalım Orda Sekeme isimleri Çıkacak. herhangi birini seçerek lütfen test edin. ardından kaydetmek için Makro İçerebilen Excel Çalışma Kitabı'nı seçelim. O Şekilde kaydedin.
eki inceleyiniz.
Birde çok acele etmeyin her beş dakikada bir mesaj atmışsınız bunun gereği yok