Comment faire copier colonne b vers colonne a puis b puis c

Résolu/Fermé
luky123654 Messages postés 54 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 24 août 2018 - Modifié le 5 mai 2017 à 00:33
luky123654 Messages postés 54 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 24 août 2018 - 6 mai 2017 à 00:16
Bonjour,
merci pour ta réponses fahora je c est pas comment faire loll voila je voudrais faire cela
feuille production feuille résultat
ouvrier production
michel 759 759 812
jacque 658 658 650
luc 568 568 520
colonne A colonnes B colonne A colonne B colonne C
colonne B reste toujours a sa place feuille production

quand je fait activer une macro il copie la colonne production et la met dans la feuille résulta dans colonne A puis .
colonne a remplie il vas en B puis remplie vas en C ex ......
voie les différence chaque jours
comment je devais faire je conètre un peux les macro .
jais esayer acec shift ctrl fleche mais sa vas pas
bien à vous
luky
A voir également:

3 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
5 mai 2017 à 07:12
Bonjour,

Mettez un fichier modele pour que nous puissions vous comprendre. j'ai une vague idee de ce que vous voulez, mais un exemple confirmera ou pas

Pour transmettre un fichier,
Veillez a ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
0
PHILOU10120 Messages postés 6368 Date d'inscription lundi 16 avril 2012 Statut Contributeur Dernière intervention 22 avril 2024 796
5 mai 2017 à 10:28
Bonjour

cela devrait ressembler à ceci

'Copie les données
Application.Goto Reference:="données" ‘le champ des informations à copier
Selection.Copy ‘ copier les informations
Application.Goto Reference:="ancre1" ‘ le mon de la cellule de départ A1 dans votre cas
Selection.End(xlToRight).Select ‘sélectionne la dernière cellule renseignée de la ligne1
ActiveCell.Offset(0, 1).Activate ‘Active la cellule suivante
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False ‘ collage spécial des valeurs

0
luky123654 Messages postés 54 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 24 août 2018
6 mai 2017 à 00:16
merci f894009 je vient de faire un tableau
bon week
luky
0