Sutun başlığına göre icmal düzenleme

tahsinanarat

Kullanıcı
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Sub Malzeme_Cikis()
Sheets("kontrol").Range("I4:J204").ClearContents
t = Timer
Application.ScreenUpdating = False
Set S1 = Sheets("Malzeme_Toplu_Cikis")
Set S2 = Sheets("kontrol")
sat = 3
For i = 8 To 70
If S1.Cells(1, i) <> "NO" And S1.Cells(1, i) <> "BEDEN" Then
sat = sat + 1
S2.Cells(sat, "I") = S1.Cells(1, i)
S2.Cells(sat, "J") = WorksheetFunction.Sum(S1.Range(S1.Cells(2, i), S1.Cells(Rows.Count, i)))
End If
Next i
'S2.Range("I4:J38").Sort S2.Range("J4"), 2
Application.ScreenUpdating = True
MsgBox "İşlem Tamam " & Format(Timer - t, "Fixed") & "Sn."
End Sub
(kodlar @Feyzullah hocama aittir)

Ekli örnek dosyamda yukarıdaki kod ile Kontrol sayfasında ürün başlığına göre icmal çıkartabiliyorum. Ancak ben icmal sayfasında belirttiğim şekilde Malzeme_Toplu_Cikis sayfasındaki C sutununda bulunan Cinsiyet, J sutunundan sonraki sutun başlığındaki ürün ismi, ürün isminin sağında bu gürüne ait Beden yada No ile belirtilen sutundaki değeri baz alarak belirttiğim tarih aralığını Malzeme_Toplu_Cikis sayfasındaki G sutunundaki tarihlere göre Adet toplamlarını almak istiyorum.
Almak istediğim sonuç icmal sayfasında gösterdiğim şekilde olacak. Yardımcı olacak hocalarıma şimdiden teşekkür ederim. Saygılarımla.
 

Ekli dosyalar

Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst