Erreur 91 Variable de Bloc With non def

Bonjour à tous,

J'essaye depuis un moment de lancer le code ci après dans mon userform, tout fonctionnait bien il y'a un moment mais depuis ce matin ça m'affiche erreur 91.. Variable de Bloc With non défini... JE NE COMPRENDS PAS

Sub alim_textbox_yon()

Dim Var As Integer

Dim Derligne_name As String

Dim c As Range

Dim Cell_name As Range

Var = 0

Derligne_name = Sheets("PDL").Range("C65536").End(xlUp).Address

Set c = Sheets("PDL").Range("c:c").Find(UCase(Initialisation.cbonameyon.Text), LookIn:=UCase(xlValues))

With Initialisation.Txtbox_tarif_yon

.Value = ""

For Each Cell_name In Worksheets("PDL").Range("C2:" & Derligne_name)

If c.Value = Cell_name Then

Do While Var = 0

.Text = " TARIF " & c.Offset(, 4).Value

Var = Var + 1

Loop

End If

Next Cell_name

End With

End Sub

Pouvez vous m'aidez svp ?

Je souhaiterai récupérer la valeur choisie (un nom) dans ma combobox cbonameyon et afficher le tarif correspondant en fonction de la valeur qui s'affiche. Dans la colonne c : c de ma feuille PDL, se trouvent tous les noms renseignés dans la combobox cbonameyon.

bonjour,

sans le userform KIVABIEN avec ça m'étonnerait qu'on puisse deviner...

il doit y avoir quelque chose de surligné quand tu acceptes le débogage...

Sans doute Txtbox_tarif_yon ?

Une faute de frappe dans le nom du contrôle peut-être ?

A+