[R E S O L U ] Transfert de données d'un onglet à l'autre suite à un menu déroulant

[Papy 100]

Bonjour le Forum et merci pour le temps que vous me consacrez.

Je souhaiterai que lorsque : en colonne "F" le menu déroulant libère : " Remis l'année suivante " le contenu de la colonne D, apparaisse dans la colonne "D" de l'onglet 2015 ainsi que la date du transfert dans la colonne C du même onglet.

En vous remerciant d'avance Patrick.

 

[Paf]

Re : Transfert de données d'un onglet à l'autre suite à un menu déroulant

Bonsoir

ci dessous un code répondant à la demande:

dans la feuille de code de la feuille 2014, rajouter:

Private Sub Worksheet_Change(ByVal Target As Range)
 Dim DerLig As Integer
 Dim Wcible As Worksheet
 Set Wcible = Worksheets("2015")

 If Target.Column = 6 And Target.Count = 1 Then 'si on modifie une cellule de la colonne F
    If Target.Value = "Remis l'année suivante" And Target.Offset(0, -2) <> "" Then
        DerLig = Wcible.Range("D" & Rows.Count).End(xlUp).Row + 1
        Wcible.Cells(DerLig, 4) = Target.Offset(0, -2).Value
        Wcible.Cells(DerLig, 3) = Date
    End If
 End If
End Sub

bonne soirée

 

[Papy 100]

Re : [R E S O L U ] Transfert de données d'un onglet à l'autre suite à un menu déroul

Bonsoir le forum et à vous Paf
Je vous remercie pour votre aide et le temps que vous m'avez consacré.

J'ai eu un peu de mal pour mettre cette VBA active mais j'y suis arrivé. Cela fonctionne comme je le souhaite. GRANDS MERCIS Patrick