Objet requis (Erreur 424) - code de feuille

Bonjour à tous,

Je débute en VBA et malgré tous les conseils avisés que j’ai pu trouver sur ce site et sur le web, je ne trouve pas la solution à mon problème.

À l’exécution, j’ai le message d’erreur 424 "Objet requis" qui s’affiche.

Je ne peux pas communiquer les données, mais je vous explique rapidement la fonction. Lorsque l’on ajoute un article dans la colonne B, la date du jour s’affiche dans la colonne N ainsi qu’un numéro séquencé dans la colonne A. Ce numéro de séquence 1, 2, 3… doit s’incrémenter tant et aussi longtemps qu’il s’agit de la même date. Lorsque la date change, la séquence doit recommencer à 1.

j’espère que mes explications sont claires.

Mon code est le suivant :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
Application.EnableEvents = False
Derlig = [T_Vente].Rows.Count
If Not Application.Intersect(Target, Range("B5:B" & Derlig)) Is Nothing Then
Cells(Target.Row, 14) = Date
End If
DateEnreg = [T_Vente[Date]].Item(1)
N = 1
[T_Vente[Séquence]].Item(1) = N
For L = 2 To Derlig
If [T_Vente[Date]].Item(L) <> "" Then
If [T_Vente[Date]].Item(L) = DateEnreg Then
N = N + 1
Else
DateEnreg = [T_Vente[Date]].Item(L)
N = 1
End If
[T_Vente[Séquence]].Item(L) = N
End If
Next L
Application.EnableEvents = True
End Sub

Edit modo : merci de mettre le code entre balises SVP avec le bouton </>

Bonjour domichou et

Une petite présentation ICI serait la bienvenue

Si vous ne l'avez pas encore fait, je vous invite à lire :
- La charte du forum
- Quelques fonctionnalités du forum à connaître
qui vous aideront dans vos demandes et réponses sur ce forum.

Regardez aussi les petites icônes mises à votre disposition dans la barre de menu qui :
- vous permettent de poster un code (</>)
- ou de clôturer un fil lorsque vous avez terminé (V)

Concernant votre demande, si vous commencez en VBA, commencez par avoir les bonnes pratiques
- utilisez "Option Explicite" en début de module
- définissez toutes vos variables
- indentez votre code correctement

Quand vous aurez fait cela, je pense qu'il sera facile de trouver l'erreur

Merci pour votre participation

Cordialement

Bonjour BrunoM45,

Merci pour ta réponse.

C'est effectivement ce qui manquait à mon code, la définition des variables. Maintenant, tout fonctionne à merveille.

J'ai également appliquer les bonnes pratiques pour la présentation.

Il y a toujours place à amélioration!