ListBox Hk.

[Mdemir63]

Hocam çok teşekkürler
diğer gelen cevaplarla birlikte bol alternatifli kendime bu konu ile ilgili bir dosya hazırladım.Sizlerin sayesinde

İyi akşamlar

Saygılar

 

[Orion1]

Rica ederim.
İyi akşamlar.

 

[Mdemir63]

Selamlar,

Arkadaşlar küçük bir sorum daha olacak şimdi buradaki alternatifli kodları, USERFORM üzerindeki LİSTBOX a nasıl uygulayabilirim?

Saygılar sunarım

 

[Orion1]

Selamlar,

Arkadaşlar küçük bir sorum daha olacak şimdi buradaki alternatifli kodları, USERFORM üzerindeki LİSTBOX a nasıl uygulayabilirim?

Saygılar sunarım

Aynisini kullanıp deneyebilirsiniz.
içinde listbox1 olan satırlarda listbox1!in önünde başka bir şey yazılı ise onu kaldırın.
Örnek : s1.ListBox1 ise s1 i kaldırın.Listbox1 olsun.

 

[Mdemir63]

Aynisini kullanıp deneyebilirsiniz.
içinde listbox1 olan satırlarda listbox1!in önünde başka bir şey yazılı ise onu kaldırın.
Örnek : s1.ListBox1 ise s1 i kaldırın.Listbox1 olsun.

Hocam sağolun

Saygılar

Hocam SEZAR, Orion2 olmuş galiba böyle istenildiğinde değiştirilebiliyor mu?

 

[Orion1]

Merhaba.
Söylemeyi unuttum.Userformda ListBox1.ListFillRange komutu çalışmayacaktır.
Bu kod sadece çalışma sayfalarındaki listbox ve combobox'ta kullanılır.
Onun yerine listbox1.rowsource deyimini kullanmanız dağa doğru olur.

 

[Orion1]

Hocam SEZAR, Orion2 olmuş galiba böyle istenildiğinde değiştirilebiliyor mu?

Bundan sonra Orion2 nickName kullanıcam.

 

[Mdemir63]

Bundan sonra Orion2 nickName kullanıcam.

Hocam nickname değiştirebiliyormuyuz yoksa tekrar üye mi olmak gerekiyor. Ayrıca değiştiriliyorsa nasıl şifreyi değiştirden girmiştim ama yapamadım

Saygılar


Not: ListBox1.ListFillRange yerine listbox1.rowsource deyimini kullanacağız değil mi?

 

[Mdemir63]

Selam,
Hocam dediğinizi yaptım ama olmadı bakabilirmisiniz?

Saygılar

 

[Mdemir63]

Selamlar,

Hocam kodları bu aşağıdaki gibi yaptım ve sorunsuz çalıştı
teşekkür ederim.

Private Sub UserForm_Activate()
ListBox1.RowSource = "VERİ!C3:C" & [VERİ!C6500].End(3).Row
ComboBox1.RowSource = "VERİ!a1:A" & [VERİ!A6500].End(3).Row
End Sub


Saygılar