AÇilan Kutu

Katılım
13 Şubat 2006
Mesajlar
11
Excel Vers. ve Dili
türkçe
ArkadaŞlar Sayfadakİ AÇilan Kutuyu Formda Kontrol Etmek Istiyorum.en Az 20 Adet Farkli AÇilan Kutuyu Formla Ayri Ayri Secerek Kontrol Etmek İÇİn Bir Ornek Gosterebilirmisiniz.teŞekkur Ederim!
 
Katılım
22 Haziran 2005
Mesajlar
998
Excel Vers. ve Dili
Office 2007 Türkçe
Aşağıdaki örnek size yardımcı olabilir umarım

Sub AçılanKutu()
'Drop Down 1 Açılan kutunun adı siz kendi açılan kutunuzun adını bununla değiştirin
ActiveSheet.Shapes("Drop Down 3").Select
With Selection
.ListFillRange = "$A$1:$A$10" 'Veri Aralığı seçildi
.LinkedCell = "B1" 'Bağlantı Hücresi seçildi
.DropDownLines = 8 'Açılan listede liste açıkken gösterilecek satır sayısı
.Display3DShading = True 'Açılan kutumuzun 3 boyutlu almasını sağladık

End With
End Sub
 
Üst