MACRO TO LOOK through large dataa.

[Shellybelly]

Anyone knows a macro that can look through a large worksheet of data and return in another sheet results for the columns listed below?
Year
Month
Week
Date
Name
Status
Tenure
Accuracy
Production time
etc.

I am not sure if there is a macro that can do that but i'm still asking. If anyone knows....all i need is a sample and I can work from that.

[xladept]

Something like this:

Sub ShellyBelly(): Dim k As Long, c As Long, ws As Worksheet, wa As Worksheet, H, D As Range, n As Long
    Set wa = ActiveSheet: c = wa.Columns.Find("*", , , , xlByColumns, xlPrevious).Column
                        wa.copy After:=wa: Set ws = ActiveSheet
H = Array("Year", "Month", "Week", "Date", "Name", "Status", "Tenure", "Accuracy", "Production Time")
                For k = 1 To c: For n = 0 To UBound(H)
                If Trim(ws.Cells(1, k)) = H(n) Then GoTo GetNext
                Next n
                If D Is Nothing Then
                Set D = ws.Columns(k)
                Else
                Set D = Union(D, ws.Columns(k)): End If
GetNext:        Next k
                D.Delete
End Sub

[FDibbins]

Perhaps just use filters? You can then copy/paste the results where you want