listbox 1 den ikiye veri almak ve macrosunun çalışması

Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
Merhaba,

Listbox1 de cam demir tahta gibi ürünler var bunlardan birini seçtiğim zaman listbox2' de o ürünün altındakiler listelensin ve listbox2'de listelenenlerin birine tıkladıgım zaman o isimle yazacagım macronun çalışmasını istiyorum

teşekkürler.

EKLİ DOSYADA İSTEDİKLERİMİ YAZMAYA CALIŞTIM TEŞEKKÜRLER.
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
ARKADAŞLAR BENİM DOSYAYLA UGRAŞAMADINIZ GALİBA YARDIM İSTİYORUM.
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
Ben bir örnek yaptım umarım işinizi görür. Listbox2 de sadece cam olanlar için makro yaptım.Siz diğerlerini yaparsınız.
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
hamit bey yaptıgınız dosyayı eklermisinişz teşekkürler sağolun
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
merhaba,

Hamitcan arkadaşımın yaptıgı çalışıyor ve güzel olmuş ama yeni ilaveler ve isimlerde değişiklik yaptıgım zaman calışmıyor. :(

BENİM İLAVE GİREBİLECEĞİM VE YAPILANLARI DEĞİŞTİRMEM LAZIM.
HEPINIZIN YARDIMINI BEKLİYORUM
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
ildizim' Alıntı:
merhaba,

yeni ilaveler ve isimlerde değişiklik yaptıgım zaman calışmıyor. :(
Sebebi herbir isim için bir aralık tanımlamış olmamdan kaynaklanıyor ben dosyanızı düzenledim (Ekle menüsünden ad tanımlamayı seçin, benim tanımladığım alanları inceleyin, gerektiğinde yeni isimler tanımlayabilirsiniz)
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
hAMİTCAN COK SAOL BAYA KURCALAMIŞTIM AMA BULAMMIŞTIM. ŞİMDİ GÖRDÜM SAOL
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
Hamitcan merhaba,

son bir şey daha yazım bana ikinci listbozta tıkladıgım seçeneğin makrosu çalışıyor ya; tekxtboz ikide farklı verilerden bazılarının macrosu aynı.
şöyle bir şey nasıl yapabilirim.
mesala macronun adı ali olsun ben aliyede tıkladıgım zaman ali,veli,mehmet,hasan ada tıkladığım zaman ali çalışsın.
Sub veli()
ali
End Sub

Sub mehmet()
ali
End Sub
gibi yüzlerce modül yazmak istemiyorum
hepsini bir modulde toplayabilirmiyiz?
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
module3 de GENEL diye makro yazın
Sub GENEL()
MsgBox "MERHABA"
End Sub

Sonra da daha önceki kodu aşağıdaki ile değiştirin
Private Sub ListBox2_Click()
Call Module3.GENEL
End Sub

Umarım doğru anlamışımdır.
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
hayır hamitcan,
listbox ikide açtıgım ürün sayısınca yaklaşık 200 macro var benim istediğim
veli mehmet hasan'a... tıkladığım zaman ali çalışsın,
fatma ayşe zeynepe tıkladığım zaman gül çalışsın.
x,y,x. ye tıkladığımda z çalışsın gibi.. bunların sayısı artıyor devamlı

diğer 200 ünün kendi ismilye macrosu olacak zaten.
teşekkürler
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
yok bu işime yaramadı şöyle bişi olabilirmi?

mesala module3'e
veli mehmet hasan'a tıkladığın zaman ali isimli macro çalışacak şeklinde bir macro nasıl yazarız.
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
Benim yaptığım örnekte sizin istediğiniz gibi zaten.

Örneğin;

Listbox1 de SEHIRLER
Listbox2 de ISTANBUL, ANKARA, ,İZMİR, BURSA olsun.
Listbox2 de hangi seçeneği seçerseniz seçin GENEL makrosu çalışmakta.

Bundan farklı bir şey mi istiyorsunuz ?
 
Katılım
30 Kasım 2004
Mesajlar
180
Excel Vers. ve Dili
2003 ingilizce
istediğim şı hamit
listbox ikide sectiğiklerimin sadece kendisine özel macroları olanlar var;
örnek
listbox'de
300 tane veri olsun
bunlardan 30unu tek bir macroyaı 10'u yine başka tekbir macroya bağlamak istiyorum . diğerlerinini ise kendine özel macrosu var onlarda sorunum yok.

birde biz listenin macrolarını module 3 yaptık ya şu kodla bu sefer modül üçün altında bir sürü macro oldu ve excel açılmıyor responding diye ekteki kodu macroları tüm modülde olabilecek şekilde değiştirebilirmiyiz.

Private Sub ListBox2_Click()
Application.Run "module3." & ListBox2.List(ListBox2.ListIndex, 0)
End sub

teşekküler şimdiden hamit
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
İstediğinizi anladım, çözüm olarak önerim;

Ortak çalışmasını istediğiniz, Listbox2 de yeralan seçeneklerin son karakterine, 1 yada 2 gibi rakam verilmesi.

Dosyayı tekrar düzenledim.
 
Üst