CommandButton'larını faliyete koyamadım

[beyaz34]

Mal satış raporu & Mal alış raporu CommandButton'larını faliyete koyamadım.

 

[beyaz34]

:hey: :arkadas: :yardim: :?:

 

[gdemir]

anladım kadarıyla sorun burda
ComboBox1.RowSource = "ALIS!B2:B" & WorksheetFunction.CountA(Worksheets("ALIS").Range("B1:B65000"))

bu kodu
ComboBox1.RowSource = "ALIS!B2:B65536"
olarak degıstırıp deremısınız

 

[beyaz34]

Sayın gdemir ( ComboBox ) ile bir sorunum yok ( CommandButton ) UserForm1 deki mal alış ve satış butonlarında tıklandığı zaman hata veriyor ?..

 

[dEdE]

Mrb.,
Combobox ların kaynağı olan B ve E sutunlarına veri girerek denermisiniz.
Dosyanızı indirip veri girerek söz konusu butonları çalıştırdım. Hiç bir sorun çıkmadı.
Saygılar.

 

[beyaz34]

Sayın dede ben beceremedim kusura bakmayın

 

[Levent Menteşoğlu]

Sebep satış sayfanızın boş olmasıdır. Bu sayfanın B ve E sütunlarına herhangi bir veri girerseniz çalışacaktır. Hataya neden olan aşağıdaki kırmızı renkli kısımdır. (frmrapor1 userformunun initializa olayına yazılan koddur)

[vb:1:1271f2ea4d] ComboBox1.RowSource = "SATIS!B2:B" & WorksheetFunction.CountA(Worksheets("SATIS").Range("B1:B65000"))
[/vb:1:1271f2ea4d]

Hiç veri yoksa kırmızı renkli ifade 0 (sıfır) değerini bulur, dolayısıyla da "SATIS!B2:B0" gibi bir aralık tanımlaması olamaz.

 

[beyaz34]

Kusura bakmayın veri girişlerinden sorna açıldı herkeze tesekkürler açemilik .