XL 2010 Copier coller les valeurs d'une plage de cellules sur la première ligne vide d'une autre feuille

Bonjour à tous,

voici un résumé de ce que je souhaite:
J'ai 3 feuilles :
feuille 1 > "2016" là ou la valeur de mes cellules doivent être copiées
feuille 2 > "copie mail" ou je rentre mes données
feuille 3> "intermédiaire" ou se copie une partie des info de "copie mail " sous forme de formules

J'ai donc créé une macro qui me permet de copier les valeurs d'un plage de cellules qui n'ai pas fixe de la feuille "intermédiaire" vers la première ligne vide de la feuille "2016".
Ma plage sur la feuille " intermédiaire" va de A1 à Hx je souhaite prendre la dernière ligne vide (en valeur car j'ai des formules dans beaucoup de cellules mais elle sont vides en valeurs)
Voici ma macro:
Sub copier()

Application.ScreenUpdating = False

Dim x As Long

x = Sheets("intermédiaire").Range("H" & Rows.Count).End(xlUp).Row '<-- trouve la dernière ligne utilisée de la colonne R

Sheets("intermédiaire").Range("A1:H" & x).Copy Sheets("2016").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)

Application.ScreenUpdating = True

End Sub

Elle fonctionne mais me copie les formules au lieu de me copier les valeurs quelqu'un pourrait il m'éclairé ?
Merci d'avance
bonne après midi