Değişik Süzme

[mmetin24]

Yanlış Dosya Göndermişim Özür dilerim
ekte gönderdiğim dosyada FİRMALAR yazısına tıkladığımda
firma listelerinin açılarak firmaların listelenmesini,tekrar tıkladığımda
firma isimlerinin gizlenmesini istiyorum ama bi türlü yapamadım.

 

[AS3434]

Sn mmetin24

İstediğinizi veri doğrulama ile yaparsınız.
Bunun için Excel Dersanesinde Sn danersin 'in çalışmasını inceleyin.

http://excel.web.tr/showthread.php?t=2830

 

[Levent Menteşoğlu]

Aşağıdaki kodu sayfanın kod sayfasına kopyalayın. İmleçi A2 hücresine getirdiğinizde kod çalışacaktır.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$A$2" Then Exit Sub
If [a3] <> "" Then
[a3:a65536].ClearContents
Exit Sub
End If
[a3] = "A firması"
[a4] = "B firması"
[a5] = "C firması"
[a6] = "D firması"
End Sub

 

[mmetin24]

Cevaplarınız için teşekkürler...

 

[mmetin24]

Sayın Levent Hocam!
Firmalara Köprü Uygulamak İstiyorum Fakat Çalıştıramadım
Bununla İlgili Yardımlarını Bekliyorum.
emeğinize Teşekkürler!