Copier / Coller vers une autre feuille

Bonjour,,

Je recherche un code pour Copier un texte dans la feuille nommer "Identification" et le coller dans la feuille "Facture"

je vous remercie de votre aide et vous souhaite une bonne journée

Cordialement

Max

Bonjour,

Que veux-tu copier?

A te relire.

Bonjour,

Je cherche a copier les lignes "J6:O16" vers la feuille Facture

Merci à +

Max

Bonjour,

Essaye ce code:

Sub copier()

Worksheets("Identification").Select

Range("J6:O16").Copy

Worksheets("Facture").Range("C18").PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _

SkipBlanks:=False, Transpose:=False

End Sub

Cordialement,

Re,

Un exemple

Cdlt

Option Explicit
Public Sub Copier()
Dim Wss As Worksheet, Wsd As Worksheet
    Application.ScreenUpdating = False
    Set Wss = Worksheets("Identification")
    Set Wsd = Worksheets("Facture")
    Wsd.Range("C18:H28").ClearContents
    Wsd.Range("C18:H28").Value = Wss.Range("J6:O16").Value
    Set Wss = Nothing: Set Wsd = Nothing
End Sub

Re Jean-Eric

Nickel je te remercie beaucoup

Bonne journée

@+

Max