Copier et coller les cellules de plusieurs feuilles

Fermé

nihadlahit - 1 août 2016 à 20:15
NLAH Messages postés 125 Date d'inscription lundi 9 septembre 2013 Statut Membre Dernière intervention 13 juin 2017 - 10 août 2016 à 11:31

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

A voir également:

Copier coller vba excel entre 2 feuilles
Liste déroulante excel - Guide
Copier coller pdf - Guide
Formule excel - Guide
Copier une vidéo youtube - Guide
Fusionner feuilles excel - Guide

1 réponse

Réponse 1 / 1

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
2 août 2016 à 06:49

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+

NLAH Messages postés 125 Date d'inscription lundi 9 septembre 2013 Statut Membre Dernière intervention 13 juin 2017 2
10 août 2016 à 11:31

Mercii infiniment

Discussions similaires

Dessiner avec son clavier et avec des lettres

Comment faire le symbole coeur vide/coeur blanc

Discussions similaires

Newsletters