Inserer en collage Valeur V (123)

Bonjour,

Je souhaiterai faire une macro pour inserer un collage mais en Valeur V

Voici la macro que j'ai fait mais je ne sais pas comment la modifié pour l'avoir en Valeur V ( 123 )

Range("Table_0[#All]").Select
Selection.Copy
Sheets("Importation matin").Select
Rows("1:1").Select
Selection.Insert Shift:=xlDown

Bonjour jeromechant, le forum,

Pour coller les valeurs uniquement:

.PasteSpecial Paste:=xlPasteValues

ce qui pourrait donner un truc du genre:

Sub test()
 Range("Table_0[#All]").Copy
 Sheets("Importation matin").Range("A1").PasteSpecial Paste:=xlPasteValues
 Application.CutCopyMode = False
End Sub

Cordialement,

Merci mais je souhaite insérer les valeur copier car cette macro remplace les valeur qui sont déjà en A1.

bonjour,

peut-être ainsi, non testé

Sub test()
 Range("Table_0[#All]").Copy
 Sheets("Importation matin").Rows("1:1").Insert Shift:=xlDown
 Sheets("Importation matin").Range("A1").PasteSpecial Paste:=xlPasteValues
 Application.CutCopyMode = False
End Sub