Farklı shhetkerden bilgi alarak raporlama yapmak

[lordfalcon]

Merhaba ,

günlük olarak çalışan sayılarını takip edip raporluyorum.
Ekteki dosyada farklı 2 sheette günlük çalışan listesi var.
rapor sheetine tarih yazarak bu tarihteki çalışan sayısını MY,BY vs. kırılımında görmek istiyorum.

Bu dosyaya 7 ayrı kişi data girmektedir. (farklı yerlerden)

Günlük girilen listeyide saklamak zorunda olduğumdan ayrı sheetlerde olmasında yarar var.

Konuyla ilgili yardımcı olabilecek arkadaşlarıma şididen tşk ederim.


sevgiler

 

[hamitcan]

DATA1 ve DATA2 sayfaları iki ayrı günü mü ifade ediyor ?

 

[lordfalcon]

farklı sheetlerden rapor almak

DATA1 ve DATA2 sayfaları iki ayrı günü mü ifade ediyor ?

evet, ayrı günleri temsil ediyor.

 

[hamitcan]

Sub Rapor()
    Dim sht As Worksheet
    For Each sht In Worksheets
    If sht.Name = "REPORT" Then GoTo 10
With Sheets("REPORT")
    If sht.[A1] = .[A1] Then
        For j = 2 To 6
        For i = 3 To 8
           .Cells(i, j) = Evaluate("=SumProduct((" & sht.Name & "!d4:d1000=" & """" & .Cells(i, 1) & """" & ")*(" & sht.Name & "!E4:E1000=" & """" & .Cells(2, j) & """" & "))")
        Next i
        Next j
    End If
End With
10
    Next
    MsgBox "Bitti."
End Sub

 

[pınaroz]

acil (lütfen)

Merhaba,

Ben iki farklı excell sayfasını karşılaştırıp farkları bulmak istiyorum bu şekilde bi program var mı acaba ya da bir yöntem ?

Yardımcı olursanız çok sevinirim.

Teşekkürler.

 

[hamitcan]

Böyle çalışmalar forumda mevcut. Arama yapmanızı öneririm.