Re,
Oui c'est un exemple, car j'ai pas regardé tous tes userforms.
Ci dessous les modifs c'est simplement ton artistenumber qui doit être égale à l'ID
Private Sub CommandButton1_Click() 'USERFORM13
'---------------------------------------------------------------------------------------------------
'Bouton valider
'---------------------------------------------------------------------------------------------------
If Me.OptionButton1 = False And Me.OptionButton2 = False Then
MsgBox "Vous devez sélectionner Recherche par Numéro ou Recherche par Nom"
Exit Sub
End If
If OptionButton1 = True Then
num = Split(Me.Label4.Caption, "|")
id = num(1)
' ArtisteNumber = Me.Label1.Caption
ArtisteName = ""
ArtisteNumber = id
Else
num = Split(ListBox1.Value, "_")
id = num(5)
ArtisteName = num(2)
' ArtisteNumber = ""
ArtisteNumber = id
End If
UserForm8.Show
End Sub
Puis dans ton userform8 lors de l'initialisation
'--------------------------------------------------
'PREREMPLISSAGE DU FORMULAIRE DE MODIFICATION
'--------------------------------------------------
Dim fin As Long, ligne As Integer
fin = Sheets("BDD").Range("A" & Rows.Count).End(xlUp).Row
Me.Label5.Caption = Date
Dim MySearch As String
Dim MyCol As Byte
If ArtisteName <> "" Then
MySearch = ArtisteNumber
' MyCol = 2 'Colonne B
MyCol = 1 'Colonne A Les ID
' MySearch = ArtisteName
' MyCol = 4 'Colonne D
Else
MySearch = ArtisteNumber
' MyCol = 2 'Colonne B
MyCol = 1 'Colonne A Les ID
End If
Tu vas rechercher dans ta première colonne à chaque fois, quelque soit ton type de recherche initiale ( nom ou code)
Leakim