Problème avec ma macro

Bonjour,

Alors je vous expose mon problème :

Dans mon fichier j'ai une macro sur l'onglet "SAISIE" qui est la suivante :

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Cells.Count > 1 Then Exit Sub

If Not Intersect(Feuil1.Range("A4:A" & Rows.Count), Target) Is Nothing Then

Set num = Feuil5.Columns(1).SpecialCells(xlCellTypeConstants).Find(Target.Value, LookIn:=xlValues)

If Not num Is Nothing Then MsgBox "ATTENTION"

End If

End Sub

Celle ci m'affiche un msgbox lorsque je rentre une immatriculation dans mon onglet SAISIE qui figure dans l'onglet VH-reconv. Jusqu'à la tout va bien.

Aujourd'hui j'ai pensé à reprendre cette macro toujours sur mon onglet SAISIE lorsque je tape le nom d'un client (colonne B) je voudrais qu'un même msgbox apparaisse lors de la saisie du nom du client figurant dans le nouvel onglet que j'ai crée nommé CLIENTSPE (colonne A).

Pourtant lorsque je modifie la macro je n'y parviens pas... je comprend pas pourquoi j'ai bien changé les cellules et l'onglet figurant dans la macro...

Merci de votre aide

Bonjour

Tu devrais joindre ton fichier.

A te relire

Bye !

ci joint le fichier

6v1.zip (251.01 Ko)

Un essai. Cela te convient-il ?

Non c'est pas tout a fait cela, je voudrais que ma première macro reste en place et rajouter une nouvelle macro qui justement m’avertit lorsque je saisie un nom de client qui est saisie dans clientsspe

Tu écris :

...je voudrais que ma première macro reste en place et rajouter une nouvelle macro...

Alors voilà :

Cela te va-t-il ?

Bye !

Oui parfait, je viens de comprendre mon erreur !

Merci et bonne journée

Rechercher des sujets similaires à "probleme macro"