Sayfalardaki bilgiyi aktarma

[aydgur]

cari sayfalarındaki stok miktarlarını girdiğimde stok sayfamdan kendiliğinden düşmesini istiyorum , mümkünmü ?

 

[aydgur]

İyi akşamlar epeydir değerli ustalarımızın yardımlarını göremiyorum ; acaba bir kusur mu işldedim ?

 

[Levent Menteşoğlu]

Sn aydgur

Dosyanızı inceledim, ama sanırım muhasebeden anlamadığım için ne istediğinizi tam olarak çözemedim. Sanıyorum, sayfa adı isim olan sayfalardaki verileri stok sayfasına aktarmak istiyorsunuz. Ã?ncelikle hangi sütundaki veriler, stok sayfasının hangi sütununa aktarılacaktır. Bunu belirtirseniz yardım kolaylaşacaktır.

 

[aydgur]

Cari sayfalardaki cinsi hanesinin kg.leri stok sayfasındaki cinslerinin yanındaki hücrelerde tüm satışlar toplansın istiyorum . Yani cari sayfalarımda satışlarımın kg.sini yazdığımda örneğin bir makro yardımı ile stok sayfasındaki cinslerine göre kg.leri toplasın istiyorum , ayrıca cevap verdiğiniz için teşekkür ederim iyi akşamlar.

 

[Levent Menteşoğlu]

Aşağıdaki kodu Stok sayfasında oluşturacağınız bir butona bağlayarak çalıştırın.

[vb:1:a33a197ec9]Sub toplamlistele()
For a = 2 To [a65536].End(3).Row
For b = 3 To Sheets.Count
Set s1 = Sheets(b)
topla = WorksheetFunction.SumIf(s1.[d6:d65536], Cells(a, "a"), s1.[e6:e65536]) + topla
Next
Cells(a, "b") = topla
topla = 0
Next
End Sub
[/vb:1:a33a197ec9]

 

[aydgur]

Günaydın! müthişsiniz çok teşekkür ederim..Peki ; cari sayfalarım yaklaşık 180 sayfa olduğu için makroyu kullandığımda uzun bir süre bekliyorum , bunu yerine cari sayfada cinsi ve kg.sini yazdığımda hemen stok sayfasından düşürebilme imkanı varmı ? tekrar teşekkür ederim.