ComboBox Nedir, Nasıl Kullanılır ?

Açılır liste kutusu.

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#61)  Ali ÖZ » 29 Tem 2015 17:32

For i döngüsünü with dışına alıp deneyin.
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#62)  vba_kadir » 29 Tem 2015 18:20

Yav Ali hocam o kadar bilsem keşke. Iki satır yaziversen.:(
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#63)  Ali ÖZ » 29 Tem 2015 20:57

Bu şekilde deneyin.

Kod: Tümünü seç
Private Sub CommandButton1_Click()

If TextBox2.Text = Empty Then
MsgBox "Lütfen Alıcı Adı ve Soyadı Giriniz.", vbExclamation, "": Exit Sub
End If   ' BOŞ BIRAKILMASINI İSTEMEDİĞİNİZ YERLER İÇİN...

If TextBox3.Text = Empty Then
MsgBox "Alıcı Adres Bilgilerini Kontrol ediniz!", vbExclamation, "": Exit Sub
End If   ' BOŞ BIRAKILMASINI İSTEMEDİĞİNİZ YERLER İÇİN...

With Sheets("satış")
Satır = .Range("A65536").End(3).Row + 1 ' a sütunundaki son dolu satırı bulup bir sonraki satıra aşağıdaki işlemi yapar
.Cells(Satır, 2) = CDate(TextBox1.Text) 'birinci sütuna Textbox1 tarih formatında yazılır
.Cells(Satır, 3) = TextBox2         ' üçüncü sutuna ComboBox9 yazar
.Cells(Satır, 4) = TextBox3
.Cells(Satır, 5) = TextBox4
.Cells(Satır, 6) = TextBox5
.Cells(Satır, 7) = TextBox6
.Cells(Satır, 8) = TextBox7
.Cells(Satır, 13) = TextBox8
.Cells(Satır, 14) = ComboBox1
.Cells(Satır, 15) = ComboBox2
.Cells(Satır, 18) = TextBox9
.Cells(Satır, 19) = ComboBox3
.Cells(Satır, 20) = ComboBox4
.Cells(Satır, 21) = ComboBox5
.Cells(Satır, 22) = ComboBox6
.Cells(Satır, 24) = ComboBox7
.Cells(Satır, 31) = ComboBox8
.Cells(Satır, 32) = TextBox10
.Cells(Satır, 33) = TextBox11
.Cells(Satır, 34) = TextBox12
End With
For i = 2 To 10
  Controls("Textbox" & i).Value = ""
Next
MsgBox "KAYIT İŞLEMİ TAMAMLANDI", , ""
End Sub
[/quote]
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#64)  vba_kadir » 29 Tem 2015 21:25

Pardon Ali hocam. O işi çözmüştüm ben de,
Sorun şu;
Şu kodu formda kullanıyorum.
A11 , A dakileri benzersiz al.


Kod: Tümünü seç
Private Sub UserForm_Initialize()
For x = 11 To Cells(65536, 1).End(xlUp).Row
If WorksheetFunction.CountIf(Range("A11:A" & x), Cells(x, 1)) = 1 Then
ComboBox1.AddItem Cells(x, 1).Value
End If
Next
End Sub


Sayfaya yerleştirilen combobox için nasıl olmalı.
birde alfabetik sıralatabilir miyiz.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#65)  Ali ÖZ » 29 Tem 2015 22:27

Kod: Tümünü seç
Private Sub Worksheet_Activate()
Combobox1.Clear
For x = 11 To Cells(65536, 1).End(xlUp).Row
If WorksheetFunction.CountIf(Range("A11:A" & x), Cells(x, 1)) = 1 Then
ComboBox1.AddItem Cells(x, 1).Value
End If
Next
End Sub
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#66)  vba_kadir » 29 Tem 2015 22:53

Ali hocam çalışmadı.
Sayfa4
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#67)  Ali ÖZ » 29 Tem 2015 23:20

Kadir bey,dosyaya erişemiyorum. Çalışmaması için bir sebep yok.Combobox hangi sayfadaysa o sayfanın kod bölümüne yazdınız değil mi ? Ayrıca sayfa aktif olunca kodlar çalışır.
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#68)  vba_kadir » 29 Tem 2015 23:34

sanırım excelde bir sorun var. başka bilgisayarda açılan formlar bunda açılmıyor.
başka bilgisayarda deneyeceğim. Allah razı olsun. Allaha emanet.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#69)  vba_kadir » 30 Tem 2015 16:01

Ali hocam olmuyor malesef.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#70)  vba_kadir » 30 Tem 2015 16:02

sayfa4
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#71)  Ali ÖZ » 30 Tem 2015 17:34

Kadir bey,
Dosyanıza erişebilsem gerekli düzeltmeyi yaparım ama durumu biliyorsunuz.Ancak kodlarda sorun görünmüyor,uygulamada hata yok değil mi ?
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#72)  vba_kadir » 30 Tem 2015 17:37

Dosyaya neden erişemiyorsunuz anlamadım.
Bilmiyorum bir hata yaptığımı sanmıyorum ama.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#73)  vba_kadir » 30 Tem 2015 17:48

Peki bu sorun nedir acaba [uzgun]
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#74)  Ali ÖZ » 30 Tem 2015 18:23

Cepten giriyorym çünkü ;;_)
Döngüde sayfa ismini aşağıdaki gibi yazın.

For each bul in sheets("satış").range("b2:b " & range("b65536").end(3).row)
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#75)  vba_kadir » 30 Tem 2015 18:34

a sütunda ki kayıt sayısıneyse yani texboxa getirilen kayıt sayısına ait satırdaki veriye gitmeli
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#76)  vba_kadir » 30 Tem 2015 18:38

For each bul in sheets("satış").range("b2:b " & range("b65536").end(3).row)

tamamı sarı oldu
Kullanıcı avatarı
vba_kadir
Site Dostu
 
Kayıt: 15 May 2015 14:57
Meslek: polis
Yaş: 42
İleti: 1054
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aydın

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#77)  Ali ÖZ » 30 Tem 2015 22:39

Kadir bey,sayfa ismini kontrol edin.Bir de "dim bul as range" değişken satırını silip deneyin.
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#78)  Ali ÖZ » 03 Ağu 2015 11:21

Kadir bey,
Sizin dosyanızda sorun var.Ekli dosyayı inceleyin,aynı kodlarla comboboxa veri aktarımı yapılmakta.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9374
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: ComboBox Nedir, Nasıl Kullanılır ?

İleti#79)  saksema48 » 29 Mar 2016 14:38

Tarkan bey;
Öncelikle çok teşekkür ederim sizlerin sayesinde öğreniyorum.

ComboBox1 de açılır menü yaptım. Fakat içine birşey yazılmasını isteiyorum sadece seçmelerini istiyorum yanlız Style da 2fmStyleDropDownList seçtiğimde bana Ana sayfada CommandButon1.Userform1.show hatası veriyor.

2) Birde tarih kısmına sadece yıl girilmesin istiyorum bir tülü onu da yapamadım.
3) Açıklama kısmını boş geçebilirler fakat msgbox kodunu silince hata veriyor.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
saksema48
 
Kayıt: 28 Mar 2016 15:53
Meslek: b.programlama
Yaş: 34
İleti: 1
 
Cinsiyet: Bayan
Bulunduğunuz İl / Semt: ankara/çankaya

Önceki

Forum ComboBox

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 0 misafir

cron
Bumerang - Yazarkafe