UserForm kullanmadan combobox

Katılım
31 Ekim 2007
Mesajlar
134
Excel Vers. ve Dili
türkçe
Excel sayfasında UserForm kullanmadan combobox yapmak istiyorum . Ancak aşağıdaki kodlar çalışmıyor. Aşağıdaki kodunu nasıl yazabilirim.

Private Sub ComboBox1_Change()
ComboBox1.AddItem "ADANA"
ComboBox1.AddItem "ADIYAMAN"
ComboBox1.AddItem "AFYON"
ComboBox1.AddItem "AĞRI"
ComboBox1.AddItem "AMASYA"
ComboBox1.AddItem "ANKARA"
ComboBox1.ListIndex = 0
End Sub
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Katılım
12 Kasım 2008
Mesajlar
240
Excel Vers. ve Dili
2010-2013
Altın Üyelik Bitiş Tarihi
26.07.2019
Private Sub ComboBox1_Change()
ComboBox1.AddItem ("ADANA")
ComboBox1.AddItem ("ADIYAMAN")
ComboBox1.AddItem ("AFYON")
ComboBox1.AddItem ("AĞRI")
ComboBox1.AddItem ("AMASYA")
ComboBox1.AddItem ("ANKARA")
ComboBox1.ListIndex = 0
End Sub
birde böyle deneyin sanırım bu işinizi görecektir
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,248
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
kodları combobox'ın change olayına yazmayınız.:cool:
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Geliştirici -> Ekle -> Form Denetimleri" başlığı altındaki "Birleşik Giriş Kutusu"
seçip, sayfaya konumlandırın.
Ardından buna fareyle sağ tık-> Açılan menüde "Denetim Biçimlendir-> Denetim kulakçığında
Girdi aralığı kısmına gerektiği kadar hücreyi fareyle seçerek adresin orada oluşmasını sağlayın (o hücrelere seçeneklerinizi yani il adlarını yazacaksınız),
Hücre Bağlantısı kısmına da başka boş bir hücreye fareyle seçerek işlemi tamamlayacaksınız.
Listede il adlarınız görünür, seçtiğiniz ili kaçıncı sıradaki ise hücre bağlantısı olarak verdiğiniz hücrede o sayıyı göreceksiniz.
 
Katılım
12 Kasım 2008
Mesajlar
240
Excel Vers. ve Dili
2010-2013
Altın Üyelik Bitiş Tarihi
26.07.2019
sayın ömer.baran söylediğiniz ile combobox arasında fark yokmu? o zaman doğrudan veri doğrulamada liste seçip oraya illeri yazmamız daha kolay ve düz mantık olur. bir hücre bağlantısına da gerek kalmaz.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
sayın ömer.baran söylediğiniz ile combobox arasında fark yokmu? o zaman doğrudan veri doğrulamada liste seçip oraya illeri yazmamız daha kolay ve düz mantık olur. bir hücre bağlantısına da gerek kalmaz.
"ComboBox" zaten "Birleşik Giriş Kutusu" değil mi?
Ben başka bir şeyi mi tarf ettim acaba?
Konuyu açan kişinin isteği (User form kullanmadan sayfaya combobox) bence zaten ilginiç idi.

Belki seçtiği verinin kaçıncı veri olduğu şeklindeki sayısal bilgiyi formül kullanmadan elde etmek istiyordur diye düşündüm ve tarif ettim.

Birincisi sizin aklınıza, sayfada açılır liste deyince kaynak listedeki veri geliyor olabilir, bu yöntemle artık kaynak listedeki veri değil, kaçıncı verinin seçildiği bilgisi elde edilmiş olur, ikincisi combobox'u tasarladığınız sayfada konumlandırma işi daha esnek değil mi?
İyi günler dilerim.
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,248
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
"ComboBox" zaten "Birleşik Giriş Kutusu" değil mi?
Ben başka bir şeyi mi tarf ettim acaba?
Konuyu açan kişinin isteği (User form kullanmadan sayfaya combobox) bence zaten ilginiç idi.

Belki seçtiği verinin kaçıncı veri olduğu şeklindeki sayısal bilgiyi formül kullanmadan elde etmek istiyordur diye düşündüm ve tarif ettim.

Birincisi sizin aklınıza, sayfada açılır liste deyince kaynak listedeki veri geliyor olabilir, bu yöntemle artık kaynak listedeki veri değil, kaçıncı verinin seçildiği bilgisi elde edilmiş olur, ikincisi combobox'u tasarladığınız sayfada konumlandırma işi daha esnek değil mi?
İyi günler dilerim.
Form denetimlerinden değil , activex nesnesi eklemiş arkadaş.:cool:
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Excel ile uğraşan kişilerin daha detaycı olması beklenir.
Görünümü aynı olabilir, sonucuna bakılması gerekir mesela.
Seçenekleri uygulayıp, farklarını gözlemlemesi beklenir mesela.

Soru sahibi, sorusunu sormuş, ben de Sayın idris SERDAR ustanın güzel çalışmasını adres göstermişim.

Israrla sorunca da diğer cevabı vermişim.
Verdiğim cevapta da bir hata/eksiklik göremiyorum doğrusu.
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,248
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Excel ile uğraşan kişilerin daha detaycı olması beklenir.
Görünümü aynı olabilir, sonucuna bakılması gerekir mesela.
Seçenekleri uygulayıp, farklarını gözlemlemesi beklenir mesela.

Soru sahibi, sorusunu sormuş, ben de Sayın idris SERDAR ustanın güzel çalışmasını adres göstermişim.

Israrla sorunca da diğer cevabı vermişim.
Verdiğim cevapta da bir hata/eksiklik göremiyorum doğrusu.
Sayın Ömer Baran.Ben sizi eleştirmedim.Sadece açıklama getirdim konuya.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Sayın Ömer Baran.Ben sizi eleştirmedim.Sadece açıklama getirdim konuya.
Estağfurullah size değildi sitemim, Sayın excel_ance için idi.
Tabi kendisi gibi isim zikrederek ve alıntı yaparak yazmayınca yanlış anlaşıldı.
Sağlıcakla kalın, iyi günler dilerim.
 
Katılım
12 Kasım 2008
Mesajlar
240
Excel Vers. ve Dili
2010-2013
Altın Üyelik Bitiş Tarihi
26.07.2019
sayın ömer.baran yanlış anlaşıldığım ve yanlış anladığım için kusura bakma özür diliyorum.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
12,997
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
sayın ömer.baran yanlış anlaşıldığım ve yanlış anladığım için kusura bakma özür diliyorum.
Mesajınızı yeni gördüm onun için şimdi yazıyorum.
Estağfurullah, cevabımı yanlış anladığınızı söylemeniz yeterliydi.
İyi günler dilerim.
 
Üst