Soru Listboxlar yatay kaydırma çubuğu

Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
Merhaba.

Çok araştırdım ama bulamadım.
Şimdi iki adet listbox var birisini başlık diğerini veriler için kullanmak için.

Verinin olduğu listboxtta yatay kaydırma çubuğunu sağa sola kaydırınca başlıkların olduğu listboxttaki yatay kaydırma çubuğu aynı anda paralel harekettir olayı lazım.

Dosya eklemedim bunun için gerek olmaz diye.Arşivinde vs.. olupta paylaşan olursa sevinirim.
 
Tarihe göre sırala Oylara göre sırala
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
aeGNoR' Alıntı:
Muhtemelen bu işi API çözer ama ben API kullanmayı bilmiyorum.
Genişletmek için tıkla...
Bende bilmiyorum ve zaten çok çok gerekli olmadıkça uzman kişiler Api kullanmayı tavsiye etmiyorlar ama tabii bazen mecbur kullanıyoruz :)
 
Olumlu oy 0 Negatif oyla
aeGNoR

aeGNoR

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
772
Çözümler
98
Aldığı beğeni
867
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
Burda bulamayıp alttaki forumdan bulmuştum ve öncekş mesajda yazdığım hata oluyordu.

Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.
Genişletmek için tıkla...
Bu kodlar VB6 için geçerli gibi görünüyor hocam, "Scroll" eventi excelde yok maalesef.

Hwnd kodundaki hatayı çözdüm hocam orada sorun yok ama aşağıdaki kodda listbox hwnd değerlerini 0 (Sıfır) alıyor onu çözemedim.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Kodu ekleyen kişi LbxInfo.hwnd = GetFocus ile hwnd değerini alacağını iddia etmiş ama her defasında 0 (Sıfır) getiriyor.

Ekli excel kitabında hWnd değerini almayı çözen kodlar var. Fakat yukarıda da bahsettiğim gibi listboxların hwnd lerini almamız lazım onu çözemedim.

FindWindows ile alınıyordur muhtemelen ama içindeki parametrelere ne yazılacağı hakkında en ufak bir fikrim yok.

Bu arada dosya içindeki hiç bir kod bana ait değil. Muhtelif sitelerden bulup ekledim.
 

Ekli dosyalar

  • Kitap1.xlsm
    22.4 KB · Gösterim: 4
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
aeGNoR' Alıntı:
LbxInfo.hwnd
Genişletmek için tıkla...
Sağolun bendede yukardaki kısım hata vermişti ve unuttum ama lbxinfo parapetreden geliyordu ve listbox du.
Listbox özelliklerindede hwnd görememiştim.Dosyayı akşama doğru bir deneyeyim.
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
aeGNoR

aeGNoR

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
772
Çözümler
98
Aldığı beğeni
867
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
Saşolun bendede yukardaki kısım hata vermişti ve unuttum ama lbxinfo parapetreden geliyordu ve listbox du.
Listbox özelliklerindede hwnd görememiştim.Dosyayı akşama doğru bir deneyeyim.
Genişletmek için tıkla...
Hocam şimdi farkettim eklediğim kodlar farenin orta topu ile yukarı aşağı kaydırma kodlarıymış. Deneme yaparken farkettim. Yani kısacası bu kodlar da işe yaramaz. Burada da patladık. En azından elimizde farenon orta topu ile yukarı aşağı kaydırma kodları oldu orası ayrı tabi :)
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
:)
Fare kaydırma olayı benim arşivdede var ama hata olursa excel çöküyor bundan dolayı oda problem :)
FAre top olayı comboboxlara geçerli oluyor abey.
Neyse artık bekleyelim bakalım.
aeGNoR' Alıntı:
Burada da patladık. En azından elimizde farenon orta topu ile yukarı aşağı kaydırma kodları oldu orası ayrı tabi
Genişletmek için tıkla...
 
Olumlu oy 0 Negatif oyla
aeGNoR

aeGNoR

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
772
Çözümler
98
Aldığı beğeni
867
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
:)
Fare kaydırma olayı benim arşivdede var ama hata olursa excel çöküyor bundan dolayı oda problem :)
FAre top olayı comboboxlara geçerli oluyor abey.
Neyse artık bekleyelim bakalım.
Genişletmek için tıkla...
Evet fazlasıyla çökmeler yaşanıyor.
 
Olumlu oy 0 Negatif oyla
Patron

Patron

Site Dostu
Kullanıcı Bilgileri
Katılım
6 Mar 2021
Mesajlar
2,368
Çözümler
699
Aldığı beğeni
2,760
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
:)
Fare kaydırma olayı benim arşivdede var ama hata olursa excel çöküyor bundan dolayı oda problem :)
FAre top olayı comboboxlara geçerli oluyor abey.
Genişletmek için tıkla...
fare ile dikey kaydırmada combobox ve listboxta sorun yaşamadım.
breakpoint ile adım adım kod kontrolü yapmak istediğinizde
scrool kodlarını devre dışı bırakmanız lazım.
Yoksa excel çöküyor.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
Patron' Alıntı:
breakpoint ile adım adım kod kontrolü yapmak istediğinizde
scrool kodlarını devre dışı bırakmanız lazım.
Yoksa excel çöküyor
Genişletmek için tıkla...
Evet abey bunu gözlemlemiştim :)
Ayrıca hata oluncada çöküyordu.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
aeGNoR' Alıntı:
Bu kodlar VB6 için geçerli gibi görünüyor hocam, "Scroll" eventi excelde yok maalesef.

Hwnd kodundaki hatayı çözdüm hocam orada sorun yok ama aşağıdaki kodda listbox hwnd değerlerini 0 (Sıfır) alıyor onu çözemedim.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Kodu ekleyen kişi LbxInfo.hwnd = GetFocus ile hwnd değerini alacağını iddia etmiş ama her defasında 0 (Sıfır) getiriyor.

Ekli excel kitabında hWnd değerini almayı çözen kodlar var. Fakat yukarıda da bahsettiğim gibi listboxların hwnd lerini almamız lazım onu çözemedim.

FindWindows ile alınıyordur muhtemelen ama içindeki parametrelere ne yazılacağı hakkında en ufak bir fikrim yok.

[COLOR=%s]Bu arada dosya içindeki hiç bir kod bana ait değil. Muhtelif sitelerden bulup ekledim.[/COLOR]
Genişletmek için tıkla...
Dosyayı şimdi inceledim. GetFocus bu sadece yukardaki kodda var başka bir yerde yok.Bence bundan dolayı sıfır oluyor normalde GetFocus boş sonuç veriyor ama class içinde hwnd Long olarak tanımlandığı için sıfır oluyor.
Kısaca GetFocus a değer atanmıyor.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
GetFocus olayı api koduymuş biraz araştırınca.
Değerler geliyor ama birşey olmuyor.

Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.

C#:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
Ayrıca alttaki kod dosyada var ama hiç bir yerde kullanılmamış abey.Bence olay burda bitiyor ama nasıl olacak parametre içine listbox adlarını yazınca hata veriyor.

C#:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
aeGNoR

aeGNoR

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
772
Çözümler
98
Aldığı beğeni
867
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
Ayrıca alttaki kod dosyada var ama hiç bir yerde kullanılmamış abey.Bence olay burda bitiyor ama nasıl olacak parametre içine listbox adlarını yazınca hata veriyor.

C#:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
Genişletmek için tıkla...
Bence adım adım ilerliyoruz. Bu işi yapabileceğiz gibi geliyor bana.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
aeGNoR' Alıntı:
Bence adım adım ilerliyoruz. Bu işi yapabileceğiz gibi geliyor bana.
Genişletmek için tıkla...
İnşaAllah :)
Bence devrim gibi birşey olur çözülürse :)
Bugün ve haftasonu çok vaktim olacak teferruatlıca bende uğraşacağım.
 
Olumlu oy 0 Negatif oyla
aeGNoR

aeGNoR

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
772
Çözümler
98
Aldığı beğeni
867
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
İnşaAllah :)
Bence devrim gibi birşey olur çözülürse :)
Bugün ve haftasonu çok vaktim olacak teferruatlıca bende uğraşacağım.
Genişletmek için tıkla...
nesnenin ya da pencerenin hWnd özelliği ile API kullanabiliyoruz anladığım kadarıyla.
API ise kabaca windowsa "bu nesne şu konumda" ya da "bu nesnenin boyutları bunlar" gibi mesajlar gönderiyor.

Şimdi bu bilgiler ışığında şöyle bir şey denesek acaba nasıl bir sonuç alırız:
1. adım: Forma 2 tane listbox ve bir tane scrollbar ekle.
2. adım: Formdaki listbox nesnelerinin sütun genişliklerini ayarla ve scrollbar özelliğini aktif et.
3. adım: scrollbar'ın max ve min değerlerini ayarla.
4. adım: scrollbar change olayında API kullanarak listboxların kaydırma çubuğu konumunu ayarla.

Bu mantıkla bir yol alabiliriz diye tahmin ediyorum. Bir kaç deneme yaptım olmadı ama sanki çözüm böyle bir şey olacakmış gibi geliyor bana.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
2 ve 3.yazdıklarınız benimde aklımda ama bilmiyorum olur mu?
Yada en iyisi extra bir scrollbar eklemeden başarabilmek olmazsa öylede iyi olur.
 
Olumlu oy 0 Negatif oyla
aeGNoR

aeGNoR

Destek Ekibi
Kullanıcı Bilgileri
Katılım
10 Mar 2021
Mesajlar
772
Çözümler
98
Aldığı beğeni
867
Excel Versiyonu
Office 2021 TR
Refaz' Alıntı:
2 ve 3.yazdıklarınız benimde aklımda ama bilmiyorum olur mu?
Yada en iyisi extra bir scrollbar eklemeden başarabilmek olmazsa öylede iyi olur.
Genişletmek için tıkla...
Ekstra scrollbar eklemeden başarabilirsek zaten muhteşem olur. Ama onun için bu sefer ilk çözmemiz gereken konu scrollbar'ın hareketinde bir olay tetikleyebilmek olacak. Ve benim o konu hakkında en ufak bir fikrim dahi yok. :oops:
 
Olumlu oy 0 Negatif oyla
Patron

Patron

Site Dostu
Kullanıcı Bilgileri
Katılım
6 Mar 2021
Mesajlar
2,368
Çözümler
699
Aldığı beğeni
2,760
Excel Versiyonu
Office 2021 TR
Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.
burda yatay ve dikey kaydırmanın çalıştığından bahsedilmiş.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
Linkteki dosyaları import edip yazdıklarını uygulayacağım akşama doğru.
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
Konuyu Başlatan
Son düzenleme:
Olumlu oy 0 Negatif oyla
Cevap yazmak için giriş yap yada kayıt ol.

Konuyu okuyanlar

Toplam: 2 (Kullanıcı: 0, Ziyaretçi: 2)
Üst