Copier-Coller qui ne fonctionne pas (VBA)

Résolu
Bonjour,

J'ai un petit problème car je voudrais faire un copier-coller d'une feuille à une autre, mais le code ne fonctionne pas et je ne comprends pas pourquoi ...
Voici le code utilisé :

Sub EssaiCopie ()

Sheets("Feuille 1").Range("Q5").Copy
Sheets("Feuille 2").Range("D1").Paste

End Sub

Je vous remercie par avance pour votre aide.

3 réponses

  1. Contributeur
    Bonjour
    essaies
    Option Explicit
    '---------------
    Sub EssaiCopie()
    Sheets(1).Range("A5").Copy Sheets(2).Range("D1")
    Sheets(2).Activate
    End Sub

    0
    1. Cette solution ne fonctionne, finalement j'ai procédé de la manière suivante et ça fonctionne :

      Sheets("Feuille 1").Range("Q5").Copy
      Range("D1").Select
      Sheets("Feuille 2").Paste
      0
      1. Contributeur
        Cette solution ne fonctionne
        t'es s^r? pourtant, j'avais essaye
        ET MERCI DE TA PART POUR LE TEMPS PASSE A ESSAYER DE T'AIDER


        0
        1. Je ne sais pas pourquoi la solution ne fonctionnait pas chez moi
          Désolé pour cet oubli, d'habitude je ne manque pas de remercier les personnes m'aidant ...
          0