Arkadaşlar Bizim Sistemimizde Otomatik Balya Yaptırıyoruz
Ama Her Bir Veri yani satır 1 Fatura Değerinde
Biz Burda Balya Yaptırdığımızda 10 diyoruz  Her Bir Balya 10 adet firmadan Oluşmasını istiyoruz
Fakat Bir Türlü Olmuyor
10 Adettende Bir Balya Yapıyor
3 Adettende Bir Balya Yapıyor
6 Adettende Bir Balya Yapıyor
Biz Sabit Olsun İstiyoruz
10 Firma Seçtiysek
10 dan Aşağı ve yukarı Olamısını İstemiyoruz Kod da Nerde Hata Yapıyoruz
ilginiz İçin Çok Teşekkürler


___________________________________________________________________________________________________

Eczane_Grup_Sayısı = InputBox("A Gurubu,tek seferda balyaya dahil edilecek, en fazla eczane sayısını giriniz...")
   
tekrar:
    If (Eczane_Grup_Sayısı <10) Then

      Eczane_Grup_Sayısı = InputBox("Balyaya dahil edilecek, en fazla eczane sayısı 10' den az olamaz. Yeniden giriniz...")
       
      GoTo tekrar
   End If
   
   Eczane_Grup_Sayısı1 = Eczane_Grup_Sayısı

___________________________________________________________________________________________________