Microsoft 365 Formule ou code vba

[Marvin57]

Bonjour à tout le monde,

dans le fichier ci-joint je souhaiterai pouvoir faire ce qui suit;

Lorsque le nombre article dans la colonne "F" est égal à zéro, la date de la colonne "J" devrait disparaître ainsi que l'alerte de cette date (MFC).

Peut-on faire cela avec une formule ou alors en VBA ?

Merci à vous d'avance pour votre aide.

Marvin54

 

[sylvanu]

Bonjour Marvin,
Un essai en PJ avec :

Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [Tableau1[Nombre articles]]) Is Nothing Then
        If Target = 0 Then
            Ligne = 1 + Target.Row - [Tableau1].Row
            [Tableau1].Item(Ligne, 5).ClearContents
        End If
    End If
Fin:
End Sub

la date de la colonne "J" devrait disparaître ainsi que l'alerte de cette date (MFC).

L'alerte par MFC va disparaitre de facto puisque la règle de la MFC n'est pas respectée.

 

[Marvin57]

Bonjour Marvin,
Un essai en PJ avec :

Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [Tableau1[Nombre articles]]) Is Nothing Then
        If Target = 0 Then
            Ligne = 1 + Target.Row - [Tableau1].Row
            [Tableau1].Item(Ligne, 5).ClearContents
        End If
    End If
Fin:
End Sub

L'alerte par MFC va disparaitre de facto puisque la règle de la MFC n'est pas respectée.

Bonjour sylvanu,

NICKEL. Je l'ai copié dans le fichier réel et modifié les noms. Tout fonctionne très bien.

Merci beaucoup pour ton aide sur ce sujet.
Bonne journée et à bientôt.

Marvin57