VBA copier valeur cellule

Bonjour à tous,

Un petit soucis dans mon code vba, surement tout bête mais je ne vois pas...

Je souhaite copier la valeur du cellule d'une feuille A, dans la dernière ligne d'une feuille B. Tout se passe bien sauf que ma macro recopie la formule de ma cellule copiée alors que je souhaite avoir uniquement la valeur de la cellule !

Voici le code:

Option Explicit
Dim ws As Worksheet
Dim ws1 As Worksheet
Dim derlig As Integer

Sub Enregistrer_FE_BDD()

    Set ws = Worksheets("FE")
    Set ws1 = Worksheets("Suivi factures")
    derlig = ws1.[D65536].End(xlUp).Row + 1
    If derlig < 2 Then derlig = 2
    ws.[H11].Copy ws1.Range("D" & derlig)

End Sub

J'ai bien essayé de faire ws.[H11].value.copy mais cela ne marche pas ...

Merci pour votre aide.

Cordialement,

Corsaire

Bonjour

il faut faire en deux étapes pour le collage des valeurs uniquement

donc remplacer

 ws.[H11].Copy ws1.Range("D" & derlig)

par

ws.[H11].Copy 
ws1.Range("D" & derlig).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

Fred

Ou autre possibilité

ws1.Range("D" & derlig) =  ws.[H11].value

Bonjour fred2406,

Merci pour ta rapidité, ça marche nickel !

Bonne journée à toi.

Corsaire