combobox da sorun var

[kenangulal]

:hey: merhaba, ekli dosyada combobox1 ile sayfaları seçebiliyordum ama ne hikmetse şimdi yapamıyorum yardımcı olabilirmisiniz. teşekkürler.

 

[Levent Menteşoğlu]

Private Sub UserForm1_Initialize()

Yukarıdaki olayı aşağıdaki ile değiştirin. (1 fazla olmuş)

Private Sub UserForm_Initialize()

 

[kenangulal]

sayın leventm merhaba, 1 'i silince "can't find project or library" hatası verip "format" yazısı mavi oluyor. ne yapabiliriz. teşekkürler

Private Sub UserForm_Initialize()
tarih = CDate(Format(Now, "mm.dd.yy"))
For a = 1 To Sheets.Count
ComboBox1.AddItem Sheets(a).Name
Next
End Sub

 

[Ali]

Sayın kenangulal, olmaması lazım. Bir kontrol etseniz

 

[Levent Menteşoğlu]

Bende herhangi bir sorun olmadı. İyice inceleyin, bir yerde mutlaka hata yapıyorsunuz.

 

[kenangulal]

sayın fructose.sayın leventm bu dosyayı dün akşam excel 2003 türkçe versiyonunda hazırladım şimdi şirket excel 2003 ing de çalıştırmak istiyorum sadece combobox da hata verdi sorun türkçe- ing farkı olabilirmi?

 

[Levent Menteşoğlu]

türkçe- ing farkı olabilirmi?

Hayır vba da dil ayırımı yoktur. Comboboxın adını değiştirmiş olmayasınız.