CMB qui ne fonctionnent plus

Bonjour,
Après un crash de mon pc j'ai des problèmes avec un userform surtout avec les cmb,je n'arrive plus
à aller chercher les noms qui se trouvent sur une autre feuille.
Il s'agit de mes comptes personnels
Je vous mets le code VBA "ce code avait était créé par Mike 31 que je salue"
Pouvez-vous svp me dire ce qui cloche
Cordialement

Private Sub UserForm1_Activate()
' Combobox
For L = 1 To F02.Range("A" & Rows.Count).End(xlUp).Row
Cmb_Nom.AddItem F02.Range("A" & L)
Next

For L = 6 To F02.Range("N" & Rows.Count).End(xlUp).Row
Cmb_Paiement.AddItem F02.Range("N" & L)
Next
TxtDate.Locked = True
End Sub

Private Sub Cmb_Nom_Change()

End Sub

Private Sub Cmb_Paiement_Change()

End Sub