Combobox'a Veri Çekince Fazladan Çıkan Boş Satırlar

[ahmed_ummu]

Günaydın arkadaşlar.

Eklediğim örnek resimde olduğu gibi aşağıdaki kod ile Combobox'a listeleme yaptığımda listenin altında boş satırlar çıkarıyor. Boş satırların olmamasını nasıl sağlayabilirim.

ComboBox5.RowSource = "PARAMETRELER!j1:j" & Range("j65000").End(xlUp).Row

 

[ahmed_ummu]

Birde aşağıdaki kodlar ile combobox'ta listelenen malzmelerin birim fiyatları giriliyor. her bir malzemenin birim fiyatı girildiğinde, toplam malzeme listesinden düşülerek kaç adet birim fiyatı girilecek malzeme kaldığını label79'a yazdırmak istiyorum. İlk girdiğim veride "Birim fiyatı girilecek malzeme kalmadı diyo" Bunun için de yardımcı olabilir misiniz.


Girilecek malzeme toplamı "PİYASAARAŞTIRMA" sayfası K10 hücresinde bulunan veri dus değişkenine aktarılması ile oluyor

Set pa = Sheets("PİYASAARAŞTIRMA")
dus = pa.Range("k10").Value
git:
dus = dus - 1
Label79.Caption = (TextBox50.Value & " " & "Firmasına ait birim fiyatı girilecek" & " " & dus & " " & "malzeme kaldı.")
If dus = 0 Then
GoTo son:
Else
GoTo git:
son:
MsgBox (TextBox50.Value & " " & "firmasına ait birim fiyatı girilecek malzeme kalmadı. ")
End If

 

[Korhan Ayhan]

Merhaba,

İlk sorunuz için cevabımı paylaşmak isterim. Kullandığınız kod satırı aslında size istenen sonucu vermesi gerekir.

Aklıma iki sorun geliyor.

Ya J65000 hücresinden yukarı doğru giderken alt tarafta istenmeyen bir satırda boş olmayan bir hücre var. Bu sıkıntı çıkarıyor olabilir.
Ya da siz formu başka sayfada çalıştırdığınız için o sayfadaki J65000 hücresinden yukarı doğru kontrol yapıldığı için aktif sayfadaki son satır konumundan dolayı sorun yaşıyor olabilirsiniz.

Bunları çözebilmek için örnek dosyanızı görmek gerekir.

 

[ahmed_ummu]

Merhaba,

İlk sorunuz için cevabımı paylaşmak isterim. Kullandığınız kod satırı aslında size istenen sonucu vermesi gerekir.

Aklıma iki sorun geliyor.

Ya J65000 hücresinden yukarı doğru giderken alt tarafta istenmeyen bir satırda boş olmayan bir hücre var. Bu sıkıntı çıkarıyor olabilir.
Ya da siz formu başka sayfada çalıştırdığınız için o sayfadaki J65000 hücresinden yukarı doğru kontrol yapıldığı için aktif sayfadaki son satır konumundan dolayı sorun yaşıyor olabilirsiniz.

Bunları çözebilmek için örnek dosyanızı görmek gerekir.

Teşekkürler Korhan bey. Combobox sorunu çözüldü.