Copier/coller à la suite VBA

Bonjour tout le monde,

J'aimerais avoir une macro qui me permet de copier les valeurs et UNIQUEMENT les valeurs de ("B4:M4"); et qui les colles à la suite à chaque fois que je fais la manipulation.

Sub CommandButton1_Click()
Dim DEST As Range

Set DEST = Cells(Application.Rows.Count, "b").End(xlUp).Offset(1, 0)
Range("B4:M4").Copy DEST

End Sub

J'ai une macro qui fonctionne, le problème c'est qu'elle me colle la formule, alors que je souhaite juste la valeur.

Si vous avez des idées pour corriger la macro, je vous remercie.

Bonjour,

Sub CommandButton1_Click()
Dim DEST As Range

    Set DEST = Cells(Application.Rows.Count, "b").End(xlUp).Offset(1, 0)
    Range("B4:M4").Copy
    DEST.PasteSpecial xlPasteValues

End Sub

Merci bien Eric