Erreur objet 1004

Bonjour,

Je tourne en boucle sur ce problème depuis 4 jours, j'ai une erreur 1004 sur l'objet ou l'application, je ne comprends pas pourquoi. Badge2021 est le nom de mon tableau, la valeur de la textbox 2 est dans la colonne badge. quand je n'ai pas l'erreur 1004, il ne comprend pas vlookup alors que le code fonctionnait il y a 4 jours

Sub CommandButton1_Click()

Dim numBadge As Variant
Dim adresse As Variant


numBadge = Application.WorksheetFunction.VLookup(TextBox2.Value, Range("Badge2021[[BADGE]:[Renouvellement]]"), 6, False)
adresse = Application.WorksheetFunction.Match(TextBox2.Value, Range("Badge2021[BADGE]"), 0)
Range("Badge2021[Renouvellement]")(adresse) = sal & "-" & TextBox4.Value

TextBox3.Value = numBadge & "-" & TextBox4.Value

End Sub

EDIT : Ajout des balises de code