Copier un tableau d'une feuille sur une nouvelle lancé Résolu/Fermé

Question

Bonjour,

Je souhaite modifier une feuille à sa lancée en copiant un tableau de la feuille précédente. 

J'ai tenté de faire ça:

Private Sub Worksheet_Activate()
    Sheets("Choix").Select
    Range("H9:I26").Select
    Range("I26").Activate
    Selection.Copy
    Sheets("Plan de prevention simplifié").Select
    Range("H10:I27").Select
    Range("I27").Activate
    ActiveSheet.Paste
End Sub


Mais ca ne marche pas (beug au niveau du Range ("H9:I26").select

Je ne sais pas comment résoudre ce problème. 

Merci d'avance pour votre aide 

Howiz

f894009 · Answer

Bonjour,

evitez les select

Private Sub Worksheet_Activate()
    Sheets("Choix").Range("H9:I26").Copy Sheets("Plan de prevention simplifié").Range("H10:I27")
End Sub

Copier un tableau d'une feuille sur une nouvelle lancé

1 réponse

Discussions similaires