Macro dupliquer ligne

Manu · 27 Octobre 2005

Bonjour,

Pour éviter le fastidieux copier PUIS insérer ligne je recherche comment faire une macro pour dupliquer une ligne juste en mettant le curseur n'importe ou sur la ligne...
J'ai déjà vue cette Macro mais pas assez compétent pour la refaire...

MERCI BEAUCOUP

MANU DE MONTPELLIER

Charly2 · 27 Octobre 2005

Bonsoir Manu, le forum,

Tu peux insérer ce code dans ton classeur de macros personnelles :

Sub CopierInsererLigne()
' Sélectionne la première colonne de la ligne courante
Cells(Selection.Row, 1).Select
' copie toute la ligne Selection.EntireRow.Copy
' Et l'insère en décalant les cellules vers le bas Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub

Amicalement
Charly

Charly2 · 27 Octobre 2005

Re à tous,

Je te le refais :

Sub CopierInsererLigne()
' Sélectionne la première colonne de la ligne courante
Cells(Selection.Row, 1).Select
' copie toute la ligne
Selection.EntireRow.Copy
' Et l'insère en décalant les cellules vers le bas
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub

C'est mieux ainsi 😉

Charly

jsljulius · 8 Avril 2014

Re : Re:Macro dupliquer ligne

Bonjour,

Merci pour cette macro. Elle me serait utile à condition qu'elle fonctionne lorsque les données sont filtrées. Cependant, lorsque j'essaie d'exécuter cette macro sur des données filtrées, je reçois le message d'erreur suivant :

Erreur d'exécution '1004':
La méthode Insert de la classe Range a échoué.

Savez-vous s'il est possible de trouver une solution à ce problème?

Merci beaucoup!

Macro dupliquer ligne

Manu

Guest

Charly2

Nous a quittés en 2006

Charly2

Nous a quittés en 2006

jsljulius

Guest

Discussions similaires

Macro dupliquer ligne

Manu

Guest

Charly2

Nous a quittés en 2006

Charly2

Nous a quittés en 2006

jsljulius

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency