VBA: Plusieurs If sur la même variable

Bonjour,

j'ai une macro vba dans lequel j'ai une variable a pouvant prendre jusqu'à 4 valeurs: 1, 2, 3, et 4.

Cependant, pour certaines raisons d'utilisation, la variable a peut être égale à null ou à autre chose que 1,2,3, ou 4.

J'ai donc créée la conditionnelle suivante pour vérifier sa valeur:

If a <> 1 Or a <> 2 Or a <> 3 Or a <> 4 Then
MsgBox "a est différent de 1,2,3 et 4"
End If

Le problème est que même si la valeur est égale à 1,2,3, ou 4, je rentre dans mon If alors que je ne devrais pas. J'ai essayé de changer les Or en And et là par contre on ne rentre jamais dans le If même si a est différent de 1,2,3 et 4.

Comment faire pour que ça marche, svp ? Merci !