Userform - incrémenter à une ligne précise

Bonjour

J'ai une feuille "liste_titulaires" avec :

En colonne A des matricules (4 chiffres)

En colonne B des prénoms

En colonne C des noms

J'ai un userform avec

Un label nommé "Matricule", le label est renseigné automatiquement à l'ouverture de l'userform

Une textbox nommée "Prénom"

Une textbox nommée "Nom"

J'aimerais que lorsque je clique sur le bouton valider de l'userform :

La valeur de "prénom" soit copiée dans la cellule B à la ligne correspondante au matricule

La valeur de "nom" soit copiée dans la cellule C à la ligne correspondante au matricule

La colonne A n'est pas modifiable et la matricule sélectionné n'est pas forcément la dernière ligne

Il s'agit d'une sorte de recherche verticale mais je n'arrive pas à la mettre en oeuvre sous vba

Merci pour vos suggestions

Bonjour,

Comme il n'y pas de fichier, un exemple.

Private Sub CommandButton1_Click()
L = Sheets("liste_titulaires").Range("A:A").Cells.Find(What:=TextBox1.Value).Row 'recherche en colonne 1 la valeur qu'il y a dans la textbox1 (le matricule)

With Sheets("liste_titulaires")
        Range("B" & L) = Me.TextBox2
        Range("C" & L) = Me.TextBox3
End With
End Sub

Bonjour,

Merci pour votre aide, le code fonctionne !

Bon dimanche

Rechercher des sujets similaires à "userform incrementer ligne precise"