Copier/coller automatique sous exel
Résolu/Fermé
onallam
-
27 mars 2008 à 22:10
onallam Messages postés 3 Date d'inscription jeudi 27 mars 2008 Statut Membre Dernière intervention 29 mars 2008 - 29 mars 2008 à 18:55
onallam Messages postés 3 Date d'inscription jeudi 27 mars 2008 Statut Membre Dernière intervention 29 mars 2008 - 29 mars 2008 à 18:55
A voir également:
- Copier/coller automatique sous exel
- Copier coller pdf - Guide
- Copier une vidéo youtube - Guide
- Message automatique thunderbird - Guide
- Formule exel - Guide
- Super copier - Télécharger - Gestion de fichiers
1 réponse
magouero
Messages postés
242
Date d'inscription
lundi 9 juillet 2007
Statut
Membre
Dernière intervention
2 avril 2022
66
28 mars 2008 à 14:39
28 mars 2008 à 14:39
Bonjour,
Tu crée une macro qui va copier le contenu de la cellule sur laquelle tu es dans la cellule de la même référence mais dans la feuille 2.
Pour l'utiliser tu affecte un raccourci clavier à cette macro.
Ensuite tu auras à faire: clic sur la cellule à copier et appui sur le touche que tu auras affecté.
Salutations
Tu crée une macro qui va copier le contenu de la cellule sur laquelle tu es dans la cellule de la même référence mais dans la feuille 2.
Pour l'utiliser tu affecte un raccourci clavier à cette macro.
Ensuite tu auras à faire: clic sur la cellule à copier et appui sur le touche que tu auras affecté.
Salutations
28 mars 2008 à 16:29
cette macro seble répondre à ta demande: chaque fois que tu cliqueras dans A1:A20, la valeur de la cellule cliquée sera inscrite en feuil2 A1
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A1:A20")) Is Nothing Then: Exit Sub
Sheets("feuil2").Range("A1") = Target
End Sub
installer:
clic droit sur l'onglet feuil1
Visualiser le code
copier-coller la macro
28 mars 2008 à 21:37
et merci pour la macro.
Je viens de l'essayer et elle ne correspond pas tout à fait à ce que je voudrais faire.Peut-être peux-tu encore m'aider?
Quand je clique sur une cellule de la feuille 1 elle va directement en A1 de la feuille 2.Parfait.Ce que je souhaiterai en plus c'est que lorsque je clique sur une 2 ème cellule elle se retrouve en A2,une 3 ème en A3, etc...
Par avance merci.
29 mars 2008 à 11:37
Tu aurais pu le dire avant que tu voulais cumuler...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A1:A20")) Is Nothing Then: Exit Sub
With Sheets("feuil2")
derlig = .Range("A65536").End(xlUp).Row + 1
.Cells(derlig, 1) = Target
End With
'facultatif: montre la feuil2
Sheets("feuil2").Activate
End Sub
Fais attention à ce que tu veux lors de prochains messages: les contributeurs font des efforts pour aider, il serait quand même préférable que les demandeurs fassent pareil
Michel
29 mars 2008 à 18:55
désolé de m'être mal exprimé. Merci encore.
Onallam
28 mars 2008 à 21:26
merci pour ta réponse mais je n'arrive pas à créer la macro.
je devrais y arriver avec celle proposée dans le message suivant.
Merci encore.