Déplacer une ligne d'une feuille à une autre lorsqu'une cellule est coché

[Suzy]

Bonjour ,

J'ai essayé puis essayé encore.... Je n'y arrive pas voue que je suis débutante avec la programmation dans Excel.

Je désire que lorsque dans la feuille suivi , dans la colonne abandonnées, une cellule est coché; que la ligne se déplace automatiquement dans la feuille abandonnée.

Donc exemple dans le fichier :
Dans la feuille Suivi, si un X se trouve dans la cellule V2 j'aimerais que la ligne 2 se déplace automatiquement dans la feuille abandonnée à la suite l'une de l'autre.

Voici le fichier !

Merci de votre précieuse aide.

 

[youky(BJ)]

Bonjour Suzy,
Bienvenu en VBA ca va venir c'est facile
voici tu mettras la ligne de titre dans l' onglet Abandon
Macro à mettre en dessus ou dessous de l'autre.
Bruno

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column <> 22 Then Exit Sub
If Target <> "" Then
lig = Feuil3.[A65000].End(3).Row + 1 'ligne ou écrire
lg = Target.Row 'lg renvoie N° ligne selectionnée
Feuil3.Range("A" & lig & ":V" & lig).Value = Range("A" & lg & ":V" & lg).Value
''''''pour effacer la ligne du X
'Application.EnableEvents = False 'neutralise évenement
'rows(lg).delete
'Application.EnableEvents = True 'remets
End If
End Sub

EDIT: je viens de raccourcir l'autre macro
Voici, supprime Cells.Interior.ColorIndex = xlNone après l'avoir fait tourné 1 fois

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
[Tableau1].Interior.ColorIndex = xlNone
[Tableau1].Rows(Target.Row - 1).Interior.ColorIndex = 22
End Sub

 

[Suzy]

Bonjour ,

Tout d'abord , merci de votre aide , J'ai copier coller dans mon fichier , mais ca ne fonctionne pas 🙁

Je ne comprend pas pourquoi...

Auriez vous une autre idée?

Merci

 

[youky(BJ)]

Peut être que ce que j'appel l'onglet Suivi pour moi c'est Feuil3 (voir en fenêtre vba projet)
Voici le fichier , attention j'ai supprimé des lignes de Suivi pour voir si ca marchait.
Bruno

 

[Suzy]

Quand j'ouvre le fichier que tu m'as transférer et que je mets un x dans abandonnées d'une ligne en particulier , elle ne se déplace pas ..

 

[youky(BJ)]

Regarde si la ligne se mets en Abandonnées.
Sur ma macro comme je savais pas s'il fallait supprimer la ligne en même temps j'ai mis des apostrophes.
Enlève les apostrophes sur 3 lignes dans le code et la ligne sera supprimée
Bruno

 

[Suzy]

YAHOOOOO ca fonctionne 🙂 !! Vous êtes mon héro du jour.

Merci infiniment !

Suzy