problème de copier coller simpleRésolu

Question

Bonjour à tous,
j'ai un problème qui est, je pense, simple mais je n'arrive pas à comprendre ce qui ne va pas dans ce petit code. Je vous le donne : 

Sub COPIERCOLLER()
'
' COPIERCOLLER Macro
' Macro enregistrée le 08/07/2008 par UCPA
'



'
    Range("A12").Select
    Selection.Copy
    Sheets("Feuil2").Select
    Range("A5").Select
    ActiveSheet.Paste
    Sheets("Feuil1").Select
    Range("A13").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Feuil2").Select
    Range("A6").Select
    ActiveSheet.Paste
   
End Sub





Le problème, c'est que, au lieu de copier et coller mes deux cellules, il ne fonctionne que pour la dernière alors que le code est le même pour les deux, c'est ça que je ne comprends pas. J'ai essayé d'enlever ou de mettre l'"Application.CutCopyMode" mais ça ne change rien. 
Quelqu'un pourrait-il m'espliquer et m'aider parce que je n'ai testé mon code que sur deux cellules mais je vais être amenée à l'étendre. Alors, si déjà ça ne fonctionne pas pour 2 cellules, ça risque d'être difficile pour plus.

Merci de votre aide!!

mortalino · Accepted Answer

salut,

plus simple et plus rapide :

    Sheets("Feuil2").Range("A5").Value = Sheets("Feuil1").Range("A12").Value
    Sheets("Feuil2").Range("A6").Value = Sheets("Feuil1").Range("A13").Value

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

bigfish_le vrai · Answer

Salut,

    Sheets("Feuil1").Range("A12:A13").Select
    Selection.Copy
    ActiveSheet.Paste destination:= Sheets("Feuil2").Range("A5")

A+

bigfish_le vrai · Answer

Salut Mortalino 

Faster !

mortalino · Answer

salut Bigfish_le vrai ;)

Trop lent, de peu, certe, mais bonne méthode aussi 
Il aura le choix 

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

titoo22 · Answer

A vrai dire, c'est "elle" mais merci beaucoup pour votre aide je préfère ta méthode, mortalino elle est plus proche du langage que l'on utilise en général. Je la trouve plus transparente.

Bonne journée à vous deux !!

bonjourcheval · Answer

N'oublie de clicker sur réponse accepté quand quelqu'un répond à une de tes questions!

Problème de copier coller simple

6 réponses

Votre réponse

Discussions similaires