(19/09/2021, 13:58)berduş yazdı: kodu aşağıdaki gibi dener misiniz?
xB21 = S1.Range("B21").Value
If S1.Range("B22").Value >= 450 Then xB21 = Int((S1.Range("C8").Value + 225) / 450) + 1 '<== eklenen
If S1.Range("B22").Value <= 400 Then xB21 = Int((S1.Range("C8").Value + 225) / 400) '<== eklenen
S1.Range("B21").Value = xB21 '<== eklenen
bu kodlar araya eklenecek
Set S1 = Sheets("Pergole")
'kodların ekleneceği yer
TextBox_Fitil.Text = S1.Range("B21").Value
TextBox_FitilAraOlcu.Text = S1.Range("B22").Value
@berduş hocam değeri 400-450 aralığında çıkarmam değer bu sınırın dışında çıkıyorsa 450 den büyük ilk değerde hesaplatmam gerekiyor. Üretimden arkadaşlarla görüştüm 300 lü değerlere hiç bulaşmamamız gerekiyor. Bazı ölçülerde 400-450 arası 2 fitil sayısı da olabiliyor. Böyle durumlarda küçük olan fitil sayısı değerini seçmem gerekiyor. Toplam Tutarı daha az hesaplaması için. Fitil sayısı arttıkça hesap kabarıyor çünkü.
Access Çekirgesi
Son Düzenleme: 19/09/2021, 14:20, Düzenleyen: Oğuz Türkyılmaz.