combobox nasıl yapılıyor

[sozlersilah]

combo butonu nasıl yapılıyor örnekleri inceledim yapamadım verileri nasıl gireceğiz.Acces kolaydı bu biraz karışık geldi

 

[selections]

Biraz daha detay lütfen

 

[xxrt]

UserForm Üzerinde ComboBox Hazırlamak için,
*Çalışma Sayfasında ike Alt+F11 yaparak Modül sayfasına ulaşın.
-Inset>>UserForm tıklayarak Toolbox'dan ComboBox'u tıklayarak UserForm üzerine çizin..
Kullanım için forumda arama yapınız..

Çalışma Sayfasında ise;

*Denetim Araç Kutusu>>Karma Kutu tıklıyarak Çalışma Sayfasına ekleyin.
Kullanım için forumda arama yapınız..

ComboBox' veri almak:

ComboBox seçil iken Properties(Ã?zellikler)kısmından RowSource kısmına
Sayfa1!A1:A20 yazdığınızda Sayfa1'in A1 ile A20 arasındaki veriler ComboBox'da görünür..Çalıştırmak için F5 tuşuna basınız..
UserForm'da bu böyledir..
Kolay Gelsin.

 

[falcon bsd]

RowSource diye bişey yok.

Bunun sebebi ne olabilir.

 

[Levent Menteşoğlu]

Sayfa üzerinde kullandı iseniz listfillrange olarak kullanmalısınız, rowsource userform üzerinde iken geçerlidir.

 

[falcon bsd]

tamamdır.çok teşekkürler

 

[sozlersilah]

excelde combobox dan seçtiğimiz kişilerin sayfasına nasıl geçiş yapabiliriz.Köprü eklemekle olabilirmi

 

[Levent Menteşoğlu]

Eğer sayfa isimleri comboboxtaki isimlerle aynı ise comboboxa aşağıdaki kodu yazmanız yeterlidir.

[vb:1:6fa0a2a811]Private Sub ComboBox1_Click()
Sheets(ComboBox1.Value).Select
End Sub[/vb:1:6fa0a2a811]

 

[sozlersilah]

teşekklürler levent bey farklı excel sayfasını actırmak için nasıl kod yazabiliriz.

 

[Levent Menteşoğlu]

Sanırım başka bir excel dosyasını kasdediyorsunuz bu durumda aşağıdaki gibi bir kodu deneyin.

[vb:1:a171af01a2]Private Sub ComboBox1_Click()
Workbooks.Open Filename:="C:\Documents and Settings\" & combobox1.value
End Sub
[/vb:1:a171af01a2]

 

[osan003]

Aslında bu konunun Dersane bölümünde daha ayrıntılı ve döküman olarak anlatılması bizlerin işine çok yarayacaktır.
Selamlar

 

[tahabey01]

ya arkadaşlar ben bu combobox denilen şeyi yaptım çalıştı ama bu listedeki şeyin aynı sayfa üzerinde daha doğrusu konulan hücre üiçeriğini almasını ve bunu formülleri etkilemesini nasıl yapa bilirim

 

[yaniya]

combo box alanını seçerken A1:A20 yerine aradaki bazı hücreleri listelemek istiyorum. bunun için A1;A5;A20 gibi yazıyorum ama hata veriyor.

 

[xternet]

Eğer sayfa isimleri comboboxtaki isimlerle aynı ise comboboxa aşağıdaki kodu yazmanız yeterlidir.

[vb:1:6fa0a2a811]Private Sub ComboBox1_Click()
Sheets(ComboBox1.Value).Select
End Sub[/vb:1:6fa0a2a811]

Sayın Menteşoğlunun yukarıdaki yanıtını farklı şekilde almam mümkün mü?

ComboBox a verileri nasıl alacağımı bu sayfaları inceleyerek buldum. Sonrasında ComboBox da yapacağım seçimin başka bir sayfanın istediğim hücresine aktarılmasını nasıl sağlarım.

Mesela DENEME sayfasının A1 hücresinde görmek istersem

 

[Ömer]

Merhaba,

Bu şekilde deneyin.

Private Sub ComboBox1_Click()
     Sheets("DENEME").Range("A1") = ComboBox1.Value
End Sub

.

 

[xternet]

Teşekkür ederim Sayın Ömer. Her zamanki gibi
Zihninize sağlık.
İyi çalışmalar.

 

[xternet]

Çalışırken farklı sorunlar çıkınca soruların arkası kesilmiyor
Lafı uzatmadan söyleyecek olursam;

Combobox a benim adres gösterdiğim listeden başka veri girilemesin.

Combobox özelliklerini inceledim ama bulamadım.

 

[Skorpiyon]

Sayın xternet,

Bu saatte aklıma gelen tek yöntem, combobox'tan çıkışa denetim koymak.

Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error GoTo hata
If ComboBox1.Value = "" Then GoTo 10
Range("A1:A10").Find(What:=ComboBox1.Value).Activate
GoTo 10
hata:
MsgBox "Girdiğiniz Veri Yok"
ComboBox1.Value = ""
Cancel = 1
10
End Sub

 

[xternet]

Sayın Şaban Sertkaya,
Bu saatle sunduğunuz çözüm için gerçekten çok teşekkür ederim.
Yalnız uygulamasını yarın yapıcam İnşallah.
Herkese hayırlı sabahlar.
İyi çalışmalar.

 

[turan1245]

Merhaba,

Bu şekilde deneyin.

Private Sub ComboBox1_Click()
     Sheets("DENEME").Range("A1") = ComboBox1.Value
End Sub

.

Evet bu komut, seçilmesi ile yönlendiriyor..

Teşkkürler bilgiler için, ustadlar..