Nb de chiffres par case

bonjour

je vous solicite a chaque fois, car je ne doute pas que se soit un des meuilleurs forum d'excel VBA

je vous demande quel est la formule a appliquer pour dire a la cellule L1 qu'il faut qu'il y est 0 ou 8 ou 13 chiffres et ni plus ni moins pour que la procedure s'applique

c'est a dire si je remplis la cellule L1 de 9 chiffres, l'action ne se passe pas

If (Not Len(Range("L" & F)) <> 0 Or 8 Or 13) Then

MsgBox "Le code barre comporte 13 ou 8 chiffres" & vbNewLine & vbNewLine & "Si le produit n'en a pas" & vbNewLine & vbNewLine & "laisser la case vide"

Exit Sub

End If

ce que j'ai fait ne fonctionne pas

cordialement

Bonjour

Essayes

  If Len(Range("L" & f)) > 0 And (Len(Range("L" & f)) <> 8) And (Len(Range("L" & f)) <> 13) Then
    MsgBox "Le code barre comporte 13 ou 8 chiffres" & vbNewLine & vbNewLine & _
           "Si le produit n'en a pas" & vbNewLine & vbNewLine & "laisser la case vide"
    Exit Sub
  End If

merci BANZAI

j’améliore journellement mon fichier grâce a vous. le plus c'est que je fais moins de faute grâce a vous

cordialement

VIVE EXCEL PRATIQUE