[Excel][VBA] Copier sans sélectionner

netman44, le mercredi 31 mai 2006 à 12:50:31

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

Répondre à netman44 Signaler ce message aux modérateurs Aller au dernier message

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

Lupin.A, le mercredi 31 mai 2006 à 15:41:33

Bonjour,

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

Lupin

Répondre à Lupin.A

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

netman44, le lundi 5 juin 2006 à 18:02:49

Bonjour et merci pour ta réponse. Mon problème est résolu avec cette astuce.

Netman

Répondre à netman44

Posez votre question Répondre

Toutes les réponses pour « [Excel][VBA] Copier sans sélectionner »