Bonjour,
Le nom du textox ( nfiche ) ne peut pas être le même qu'une macro. Sinon, il y a conflit.
Je propose donc ...
Private Sub Nofiche() ''' changement ici
Dim DerLig As Long
DerLig = Worksheets("Données").Cells(Rows.Count, "D").End(xlUp).Row
Feuil2.Nfiche = Worksheets("Données").Cells(DerLig, "D").Value
End Sub
Gelinotte
Bonjour,
J'ai testé à nouveau ton code et il fonctionne si tu changes "DV" pour "D", tant que le nom de la macro n'est pas nfiche. Car, si tu créés un textbox nfiche et que tu créés une macro Sub nfiche(), le textbox va être renommé avec son nom d'origine (textbox1, si c'était le premier créé).
Feuil2.Nfiche = Worksheets("Données").Cells(Worksheets("Données").Cells(Rows.Count, "D").End(xlUp).Row, "D").Value
Gelinotte