MUSTAFA ALPASLAN
Zeptopat
- Katılım
- 15 Mayıs 2022
- Mesajlar
- 1
Daha fazla
- Cinsiyet
- Erkek
Kod:
Et cıkıs = sheets("cıkıs")
CC = cıkıs. Range("A10000").end(xlup).row
For X = 2 to SS.
Stok. Range("g" & X).Value = application. Worksheetfunction. Sumıfs(giris. Range("h: H"), giris. Range("D:D"), TRIM(stok. Range("C" & X).Value))
Stok. Range("h" & X).Value = application. Worksheetfunction. Sumıfs(cıkıs. Range("h: H"), cıkıs. Range("D:D"), TRIM(stok. Range("C" & X).Value))
Stok. Range("ı" & X).Value = stok. Range("g" & X).Value - stok. Range("h" & X).Value
Next.
Set stok = nothing.
Set giris = nothing.
Set cıkıs = nothing.
End sub.Ürün giriş çıkış yaptığım zaman hesaplaması ve kayıt yapması uzun sürüyor. İşlemi daha hızlı yapabilmek için her seferinde tümü hesaplayacağına son girileni hesaplatmayı nasıl yaparız? Bu konuda yardımcı olursanız sevinirim.