XL 2021 désélectionner la zone de destination copiée

[JPaul78]

Bonjour,
En vba, suite à une recopie d'une zone avec avec à la suite un pastespecial (ou autre), j'ai la zone de Destination des éléments copiés, qui reste sélectionnée.
La commande "Application.CutCopyMode = False" me supprime bien la zone sélection d'origine mais pas celle de destination.
Y-a-t-il une commande vba permettant de désélectionner cette zone de façon plus élégante que de re-sélectionner une cellule hors de la zone de collage?
Par avance merci

 

[mapomme]

Bonjour JPaul78 🙂,

Application.CutCopyMode = False supprime les tirets définissant la zone source qui a été copiée ou coupée. Cette instruction ne modifie en rien la sélection de la feuille source. Sélectionnez une cellule hors de la zone source (ou cible) pour modifier les sélections (même si vous trouvez ça inélégant 😉).

Vous pouvez aussi sauvegarder la sélection de la feuille cible dans un range xrg, coller les données dans la feuille cible puis re-sélectionner l'ancienne sélection de cible :

Sub test()
Dim xrg As Range
   Feuil1.Range("C3:C6").Copy
   Feuil2.Select: Set xrg = Selection: Range("a15").PasteSpecial xlPasteValues: xrg.Select: Application.CutCopyMode = False
End Sub

nota : dans le code, on copie une zone de Feuil1 sans sélectionner cette zone.

 

[JPaul78]

Bonjour JPaul78 🙂,

Application.CutCopyMode = False supprime les tirets définissant la zone source qui a été copiée ou coupée. Cette instruction ne modifie en rien la sélection de la feuille source. Sélectionnez une cellule hors de la zone source (ou cible) pour modifier les sélections (même si vous trouvez ça inélégant 😉).

Vous pouvez aussi sauvegarder la sélection de la feuille cible dans un range xrg, coller les données dans la feuille cible puis re-sélectionner l'ancienne sélection de cible :

Sub test()
Dim xrg As Range
   Feuil1.Range("C3:C6").Copy
   Feuil2.Select: Set xrg = Selection: Range("a15").PasteSpecial xlPasteValues: xrg.Select: Application.CutCopyMode = False
End Sub

nota : dans le code, on copie une zone de Feuil1 sans sélectionner cette zone.

Merci beaucoup de ton retour rapide et clair, mapomme! En effet je pouvais chercher longtemps! je retiens ta solution de refaire une sélection puis la commande appli...