(03/12/2023, 22:24)feraz yazdı: Sıfırlama olayı resimdeki gibi ekleyin önceki doayalarada bu formlu koda ekledim.
Kod:birKGMaliyet = AraBul(birKG, .Range("B:B"))
birLTMaliyet = AraBul(birLT, .Range("B:B"))
If birLTMaliyet > 0 Then .Cells(birLTMaliyet, "D").Value = 0
If birKGMaliyet > 0 Then .Cells(birKGMaliyet, "D").Value = 0
teşekkürler sayın feraz. çalışma tamamlandı sanırım. şu ana kadar bir sorunda kalmadı. eğer çıkarsa da yeni konu açarak sorarım.
emeğinize sağlık. konu cevaplanmış konulara kaldırılabilir.
saygılar.
iyi çalışmalar.