DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Activate()
ComboBox1.ListFillRange = "a1:a" & [a65536].End(3).Row
End Sub
Bununla ilgili forumda yüzlerce örnek mevcut. Userformda kullanılan comboboxta listfillrange özelliği yoktur bunun yerine rowsource özelliği kullanılır. Aşağıdaki kodu userforma kopyalayın.userform üzerinde bulunan bir combobox'a sayfa 1 deki a1:a10 hücreleri arasındaki listeyi tanımlamayı nasıl yaparız??:yardim:
private sub userform_initialize()
[LEFT]ComboBox1.rowsourse = "sayfa1!a1:a" & [a65536].End(3).Row
End Sub[/LEFT]