AccessTr.neT
Combobox Hazırlama - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Combobox Hazırlama (/konu-combobox-hazirlama.html)



Combobox Hazırlama - Jer Fin - 23/05/2021

Herkese selamlar;
ComboBox İle userformda katogori ismi bölümüne combobox ile veri girmeye çalıştım olmadı bu verinin E sutununa yazılması gerekiyor.

Yardımcı olursanız sevinirim.


RE: Combobox Hazırlama - feraz - 23/05/2021

Merhaba.
Önce alttaki konularınızı cevaplarmısınız?

https://accesstr.net/konu-hucre-icine-resim-ekleme.html?pid=180438#pid180438

https://accesstr.net/konu-user-form-veri-girisi-yardimm.html


RE: Combobox Hazırlama - Jer Fin - 23/05/2021

cevapladım


RE: Combobox Hazırlama - feraz - 23/05/2021

Sağol üstad.
Dosyanızda combobx ekledim tetbox5 i gizlemeniz gerekmekte.
Comboya girilen veri textbox5 e aktarıyor.
Sadece combobox eklenseydi kod karışık olduğu için bir sürü yer depşlmesi gerekecekti.
Alttaki kodda array içine, koyarak devam edebilirsiniz yada bir sayfa ekleyip oraya kategori adlarını girip comboyada alabilirsiniz.

Private Sub UserForm_Initialize()

ComboBox3.List = Array("Kolye", "Zincir", "Bilezik", "Küpe", "Yüzük", _
                        "Set Bakim")



RE: Combobox Hazırlama - Jer Fin - 23/05/2021

Teşekkürler üstadım olmuş.


RE: Combobox Hazırlama - feraz - 23/05/2021

Rica ederrim.veri olmadığı için tet edemedim.

Private Sub ListBox1_Click() kodundaki  alttaki koddaki 5 yerine 4 olması gerek deneyin abey.

If a = 5 Then
        ComboBox3.Value = ListBox1.Column(a)
        GoTo var
    End If