VBA

Bonjour,

Je ne suis pas expert dans les macros,j 'ai donc besoin de votre aide.

Je possède un tableau avec deux feuilles: feuille 1 "A EFFECTUER" et feuille 2 "REALISES"

Sur ma feuille 1 en colonne J j'ai positionné une liste OUI NON

Lorsque je choisi OUI, je souhaiterai que la ligne entière de la feuille 1 soit coupée et collée sur la 2, en s'ajoutant à la suite.

Merci

Bonsoir,

une proposition macro à mettre dans le code de ta feuille 1 (adapter éventuellement le nom de feui2 ci-dessous.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Column <> 10 Or UCase(Target) <> "OUI" Then Exit Sub
    Target.EntireRow.Copy Sheets("feuil2").Cells(Sheets("feuil2").Cells(Rows.Count, 1).End(xlUp).Row + 1, 1)
    Target.EntireRow.Delete shift:=xlUp
End Sub

EXCELLENT

Je te remercie h2so4

Je bute la dessus depuis plus d'un mois et tu me règles ça en rien de temps.

trop de maitrise