Copie de ligne dans excel
Résolu
Francis
-
Francis -
Francis -
Bonjour,
J'ai une base de données avec 2 feuilles.
Dans ma première feuille, j'ai les colonnes A jusqu'à S. Je veux qu'aussitôt j'aie inscrit quelque chose dans ma colonne M que par automatique ma colonne C, D et F aye ce copier dans ma 2e feuille à la suite des suivants colonne A, B et C.
Espérant que ma demande soit claire je vous remercie pour votre aide
J'ai une base de données avec 2 feuilles.
Dans ma première feuille, j'ai les colonnes A jusqu'à S. Je veux qu'aussitôt j'aie inscrit quelque chose dans ma colonne M que par automatique ma colonne C, D et F aye ce copier dans ma 2e feuille à la suite des suivants colonne A, B et C.
Espérant que ma demande soit claire je vous remercie pour votre aide
A voir également:
- Copie de ligne dans excel
- Aller à la ligne excel - Guide
- Partage de photos en ligne - Guide
- Liste déroulante excel - Guide
- Copie cachée - Guide
- Word et excel gratuit - Guide
2 réponses
bonjour,
Pour cela, il te faut une macro événementielle qui se déclenche lors de la saisie en colonne M :
Cette macro est à insérer dans "ta première feuille" en changeant éventuellemnt le nom de ta feuille copie (mode d'emploi)
Toujours zen
La perfection est atteinte, non pas lorsqu'il n'y a plus rien à ajouter, mais lorsqu'il n'y a plus rien à retirer. Antoine de Saint-Exupéry
Pour cela, il te faut une macro événementielle qui se déclenche lors de la saisie en colonne M :
Private Sub Worksheet_Change(ByVal sel As Range) If Not Intersect(sel, Columns("M")) Is Nothing Then If sel.Count = 1 Then Dim lig As Long With Sheets("Feuil2") ' nom feuille de copie lig = .Cells(.Rows.Count, 1).End(xlUp).Row + 1 .Cells(lig, "A").Value = Cells(sel.Row, "C").Value .Cells(lig, "B").Value = Cells(sel.Row, "D").Value .Cells(lig, "C").Value = Cells(sel.Row, "F").Value End With End If End If End Sub
Cette macro est à insérer dans "ta première feuille" en changeant éventuellemnt le nom de ta feuille copie (mode d'emploi)
Toujours zen
La perfection est atteinte, non pas lorsqu'il n'y a plus rien à ajouter, mais lorsqu'il n'y a plus rien à retirer. Antoine de Saint-Exupéry