Salut surchat,
je te remercie pour la réponse.
c'est presque tout à fait ca dont j'ai besoin.
En réalité j'ajoute des ligne via un formulaire avec le code suivant.
If MsgBox("Voulez vous valider cet enregistrement?", vbYesNo, "MS©2019") = vbYes Then
Lr = f.Range("K" & Rows.Count).End(xlUp).Row + 1
f.Range("B" & Lr).Value = Me.ComboBox2.Value
f.Range("C" & Lr).Value = Me.txtheure.Value
f.Range("D" & Lr).Value = Me.ComboBox13.Value
f.Range("E" & Lr).Value = Me.txtPlaques.Value
f.Range("F" & Lr).Value = Me.cobAupresde.Value
f.Range("G" & Lr).Value = Me.txtDescription.Value
f.Range("H" & Lr).Value = Me.txtRemarque.Value
f.Range("I" & Lr).Value = Me.txtContact.Value
f.Range("J" & Lr).Value = Me.cobConcérné.Value
f.Range("K" & Lr).Value = Me.cobStatut.Value
f.Range("L" & Lr).Value = Me.cobRealisepar.Value
f.Range("M" & Lr).Value = Me.TextBox7.Value
f.Range("N" & Lr).Value = Me.ComboBox10.Value
mais je souhaite qu'il rajoute une ligne comme avec ton exemple et pas qu'il rajoute une ligne à la fin
Tu as une idée de comment faire??
Merci d'avance