Comboboxlara toplu halde komut vermek

Katılım
7 Mart 2007
Mesajlar
22
Excel Vers. ve Dili
excell 2003
Arkadaşlar,

oluşturduğum bir userform'da 88 adet combobox mevcut.
Ve ben "yeni kayıt" tuşuna bastığım zaman tüm comboboxların boşaltılmasını istiyorum. şu anda kullandığım :

combobox1=""
combobox2=""
....
...
Combobox88=""


bunun yerine, 2 den 88'e kadar tüm comboboxları boşalt, veya userformdaki tüm comboboxları boşalt komutunu nasıl verebiliriz?

Benzer şekilde :
combobox1=actıvecell.offset(0,1)
combobox2=actıvecell.offset(0,2)
...
Combobox84=actıvecell.offset(0,84)
komutunu da toplu halde vermenin bir yolu var mıdır?

Ilgilenecek arkadaşlar teşekkür ederim.
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,679
Excel Vers. ve Dili
Excel 2019 Türkçe
Aşağıdaki kodu deneyin.
Kod:
for i = 1 to 88
controls("ComboBox" & i) =""
next
 
Katılım
7 Mart 2007
Mesajlar
22
Excel Vers. ve Dili
excell 2003
PEKİ 2. BÖLÜMÜNÜ NASIL YAPIYORZ:

YANİ
combobox1=actıvecell.offset(0,1)
combobox2=actıvecell.offset(0,2)
...
Combobox84=actıvecell.offset(0,84) komutunu da toplu halde vermenin bir yolu var mıdır?
VEYA TAM TERSİNİN:
actıvecell.offset(0,1)=COMBOBOX1.TEXT
actıvecell.offset(0,2)=COMBOBOX2.TEXT
...
......
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,679
Excel Vers. ve Dili
Excel 2019 Türkçe
Kod:
for i = 1 to 88
controls("ComboBox" & i) =activecell.offset(0,i)
next
şeklinde deneyin.
 
Üst