[Excel][VBA] Copier sans sélectionner

Résolu
netman44 Messages postés 65 Statut Membre -  
netman44 Messages postés 65 Statut Membre -
Bonjour,

Je cherche à copier des données d'un onglet pour les coller dans un autre mais sans sélectionner les onglets en question au cours de l'opération.

Pour cela, je pensais avoir résolu le problème en attribuant des noms à chaque plage concernée mais visiblement le fait de copier la plage oblige quand même à aller dans l'onglet.

Mon problème est que chaque onglet de ma feuille contient un code à l'activation qui repositionne la feuille :
Range("F2").Select
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column

Donc quand je fais l'opération suivante :
Range("PLAGE_1").Copy '(sur l'onglet 1)
Range("PLAGE_2").Paste '(sur l'onglet 2)

La deuxième ligne échoue car le fait d'aller sur l'onglet 2 sélectionne la cellule F2 et annule du même coup la copie de "PLAGE_1".

Merci de votre aide.

Netman

2 réponses

  1. Utilisateur anonyme
     
    Bonjour,

    Application.EnableEvents = False
    Range("PLAGE_1").Copy '(sur l'onglet 1)
    Range("PLAGE_2").Paste '(sur l'onglet 2)
    Application.EnableEvents = True

    Lupin
    2
  2. netman44 Messages postés 65 Statut Membre 1
     
    Bonjour et merci pour ta réponse. Mon problème est résolu avec cette astuce.

    Netman
    1