Erreur non repertoriée

[Eric D]

Bonjour à toutes et à tous,

Pourriez-vous m'expliquer pourquoi j'ai ce type d'erreur dans mon code (2ème ligne):

If rdv.Controls("Textbox" & Range("AI30").Value).Value = "" Then
rdv.Controls("Textbox" & Range("AI30").Value).SetFocus
Exit Sub
End If
Merci pour vos lumières.

Eric D

 

[gbinforme]

Re : Erreur non repertoriée

bonjour,

Cette erreur est due au fait que ta textbox n'existe pas puisque ta cellule avec le n° est vide.

Ton test devrait plutôt être <> que = à mon avis...