Macro to create chart with sort function

[Faintkitara]

Hello,

I would like to create a chart in another worksheet (starting at cell N4) that pulls data from the current worksheet labeled " Time"

There are several pieces of data listed in "Time" but the only thing that I care about are three columns that arent' next to each other labeled "Name" "Customer" "Projection" on row four.

In "Projection" I would like to sort the values so that only values above 2000 and below -2000 are selected. values are sorted from highest to lowest I would also like to keep the colors and cell formatting.

After that, I would like to copy and paste all three columns into cell N4 on another worksheet titled "Pivot" starting in cell N-4.

Thank you and I appreciate if any of you can be of any assistance.

 

[Faintkitara]

I started off with some code to sort the values in "Projection", this doesnt include any copying or pasting yet..

Sub FilteringData()



Dim i As Integer, rngData As Range


Set rngData = ActiveSheet.Range("A4")
i = Application.WorksheetFunction.Match("Projection", Range("A1:AZ1"), 0)


rngData.AutoFilter Field:=i, Criteria1:=">2499", Operator:=xlAnd, Criteria2:="<-2499"


End Sub