How To Make Monthly Report

[Jamie Harris]

I Have a data sheet called 2017, in the R column there is the months. There is a January sheet i want this sheet to extract all the data from the 2017 sheet if in 2017 sheet column r it says January. here is the file you can check it out im so confused... Click Me

 

[My Aswer Is This]

This script will copy all the rows in sheet named "2017" if the value in column "R" says "January"
And the row will be copied into a sheet named "January"

This script assumes you already have a sheet named "January" in the active workbook.

If you want this script to also work on other months then you must say so.
And if so be sure and point out if all the sheets have already been made or does the script have to make the sheet also.

I never click on links. And specific details are always important.

Sub Copy_Month()
Application.ScreenUpdating = False
Dim i As Long
Dim Lastrow As Long
Dim Lastrowa As Long
Sheets("2017").Activate
Lastrow = Sheets("2017").Cells(Rows.Count, "R").End(xlUp).Row
Lastrowa = Sheets("January").Cells(Rows.Count, "R").End(xlUp).Row

    For i = 1 To Lastrow
        If Cells(i, "R").Value = "January" Then
            Rows(i).Copy Destination:=Sheets("January").Rows(Lastrowa)
            Lastrowa = Lastrowa + 1
        End If
    Next
Application.ScreenUpdating = True
End Sub

 

[Jamie Harris]

is there anyway of using a formula??

 

[Jamie Harris]

Does this mean I have to run the macro everytime I add a January job to 2017?

 

[My Aswer Is This]

I know of no formula that can copy entire rows of data to other sheets based on a value in a cell.

is there anyway of using a formula??

 

[Jamie Harris]

I know of no formula that can copy entire rows of data to other sheets based on a value in a cell.

Okay with the macro you have gave it works but it doesn't update when there is a new January job add to the 2017 sheet?

 

[My Aswer Is This]

It will if you run the script again. You never said you exspect this to happen automatically every time you add data. If thats what you want you need to explain in detail when you want the script to be activated.

Okay with the macro you have gave it works but it doesn't update when there is a new January job add to the 2017 sheet?

 

[My Aswer Is This]

And you need to explain if January is going to be the only month. And I asked several questions in post #2 you never answered.