erreur suir report de données

[Shirow62]

Bonjour a tous , j'ai créer un repertoire client , mais il ne fonctionne pas sur excel 2010
il blopque sur L = 1 , il m'indique " erreur de compilation , blibliotheque introuvable "
pouvez-vous m'aider avec ce code , s'il vou plait

Private Sub Adresse_Change()

End Sub

Private Sub mail_Change()

End Sub

Private Sub Nom_Change()

End Sub

Private Sub Telephone_Change()

End Sub

Private Sub Fax_Change()

End Sub

Private Sub VALIDATION_Click()
Application.ScreenUpdating = False
'report des données dans le fichier principal
Sheets("client").Select
L = 1
For n = 2 To 51
If Cells(L, 2) = "" Then
Exit For
End If
L = L + 1
Next n
Cells(L, 1).Select
ActiveCell.Value = Nom
Cells(L, 2).Select
ActiveCell.Value = Adresse
Cells(L, 3).Select
ActiveCell.Value = Telephone
Cells(L, 4).Select
ActiveCell.Value = Fax
Cells(L, 4).Select
ActiveCell.Value = mail
Dim Txt_Message As String
Txt_Message = ""
If Nom.Value = "" Then
Txt_Message = "Veuillez saisir Nom , s'il vous plait."
End If
If Txt_Message > "" Then MsgBox Txt_Message: Exit Sub
Unload Carnet_client
Sheets("Menu").Select
Application.ScreenUpdating = True
End Sub

Private Sub ANNULER_Click()
Unload Carnet_client
Sheets("Menu").Select
End Sub

 

[ERIC S]

Re : erreur suir report de données

Bonjour

je n'ai pas 2010 mais par hasard :

si tes variables sont déclarées en option explicit, il faudrait un

dim L as double
idem pour n