Copier coller plage d'une feuille à une autre sous condition

Bonjour à tous et merci d'avance à ceux qui m'aideront.

J'aimerais créer une macro qui copie une plage de cellules d'une feuille si une cellule de cette meme feuille comporte une certaine valeur. Ensuite j'aimerais que les donnees copiées soient coller sans mise en forme (juste les valeurs) dans une autre feuille.

J'ai essayé de créer un code mais il ne fonctionne pas:

  Sub Reporting_audit()

'

' Reporting audit Macro

' Copie valeur dans la fenetre audit  2017

Dim janvier As String

If Sheets("Audit a").Range("A47").Value = "Janvier" Then

        Range("C5:C45").Select

    Selection.Copy

     Sheets("AUDIT 2017").Select

        Range("C3").Select

    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

        :=False, Transpose:=False  

 End If

End Sub

  

En vous remerciant.