Compléter une macro
Résolu
Bonjour,
Une personne très aimable m'a donné cette macro :
Je voudrai juste rajouter que lorsque la ligne est copiée le curseur soit en colonne C sur la ligne copiée, qqn peut-il m'aider ? :-)
EDIT : Ajout des balises de code.
Une personne très aimable m'a donné cette macro :
Rows(ActiveCell.Row).Copy
Rows(ActiveCell.Row + 1).Insert Shift:=xlDown
Range("D" & ActiveCell.Row + 1).Select
Application.CutCopyMode = False
Range("C" & ActiveCell.Row & ":" & "D" & ActiveCell.Row).ClearContents
Je voudrai juste rajouter que lorsque la ligne est copiée le curseur soit en colonne C sur la ligne copiée, qqn peut-il m'aider ? :-)
EDIT : Ajout des balises de code.
2 réponses
-
Bonjour
a la finRange("C" & ActiveCell.Row).Select
A+
Maurice -
ModérateurBonjour,
1 - Merci de bien vouloir utiliser la coloration syntaxique (les balises de code) lorsque tu postes du code sur le forum.
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
2 - Il te suffit de changer la ligne :
Range("D" & ActiveCell.Row + 1).Select
Par :
Range("C" & ActiveCell.Row + 1).Select
PS: Si la question est résolue..
Merci de ne pas oublier de clôturer le sujet
(en cliquant sur le lien "Marquer comme résolu" qui se trouve sous le titre de la question)
