Bonjour X Cellus,
Merci pour ta réponse,
J'ai les yeux fatigués ce matin. Mais tu utilises comme variable un nom réservé d'Excel. Ici ActiveCell =
Je ne pense pas que cela soit une variable, sinon Option Explicit m'aurait obliger à la déclarer, ce qui n'est pas le cas.
Et comme évoqué dans mon post, la macro fonctionne tant que l'on utilise pas le nom L_Matricule pour nommer la colonne A du tableau T_Source et que l'on n'utilise pas ce nom dans le row source du combo box cboMatricule du formulaire frmRecherche.
j'ai tenté de déclarer ActivXell
Dim ActivXell As Object
Set ActivXell = ActiveCell
et modifié mon code comme tu me l'as suggéré :
'On cherche la première ligne vide du tableau
Feuil2.Activate
Feuil2.Range("A1048576").End(xlUp).Offset(1, 0).Select
'On enregistre les données du formulaires dans la feuille Source
' If ActiveCell.Offset(-1, 0) = "Matricule" Then
' ActiveCell = 1
If ActiveCell.Row > 1 Then
ActivXell = ActiveCell.Offset(-1, 0) + 1
Else
ActivXell = ActiveCell.Offset(-1, 0) + 1
End If
Cela fait planter excel directement après le premier message, je n'ai même pas accès au débogage.
Merci de ton aide, bonne journée.
Cordialement.