Bonsoir,


En copiant une ligne d'une feuille à un autre je voudrais ne pas copier les formules qui sont dans la plage "EA:EH" mais seulement les valeurs !

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 Sheets("synoptique").Range("A" & i & ":H" & i).Copy Destination:=Sheets("Agent admin").Range("A200")
  Sheets("synoptique").Range("verif").Range("B" & i & ":H" & i).Copy Destination:=Sheets("Agent admin").Range("EA200")
J'ai ajouté après recherches

Code : Sélectionner tout - Visualiser dans une fenêtre à part
ActiveSheet.Range("EA200:EG200").PasteSpecial Paste:=xlPasteValues
comme ceci :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 Sheets("synoptique").Range("A" & i & ":H" & i).Copy Destination:=Sheets("Agent admin").Range("A200")
  Sheets("synoptique").Range("verif").Range("B" & i & ":H" & i).Copy Destination:=Sheets("Agent admin").Range("EA200")
ActiveSheet.Range("EA200:EG200").PasteSpecial Paste:=xlPasteValues
Mais non content d'avoir toujours les formules dans ma feuille de destination, j'obtient une petite fenêtre avec erreur 400 !

Merci par avance pour vos aides