copier et coller les cellules de plusieurs feuilles Fermé

Question

Bonjour, 

je suis débutante en vba, je voudrais créer une macro qui copier 4 cellules a partir de la feuille 1 et 2 cellules de la feuille 2 et les coller par la suite dans la feuille 3 comme suit:
voici un exemple qui explique clairement mon besoin

feuille1:

A1: 1    B1: 2
A3:  5000   B3  :6000

feuille2:

A3:  4000     B3:  2000

feulille3:

A1: 1  B1:5000  C1: 4000
A2: 2   B2: 6000  C2: 2000

j’espère que cette explication est claire,
Merci de m'aider s'il veut plait 


Configuration: Windows 7 / Chrome 52.0.2743.82

Gyrus · Answer

Bonjour,

Sub Test()    Worksheets("Feuil3").Range("A1:A2") = Application.Transpose(Worksheets("Feuil1").Range("A1:B1"))    Worksheets("Feuil3").Range("B1:B2") = Application.Transpose(Worksheets("Feuil1").Range("A3:B3"))    Worksheets("Feuil3").Range("C1:C2") = Application.Transpose(Worksheets("Feuil2").Range("A3:B3"))End Sub

A+

Copier et coller les cellules de plusieurs feuilles

1 réponse

Discussions similaires