Ce matin du jamais vu!! un if sans son endif

Bongour bongour

Je veux faire enregistrer un document sous un nom que l utilisateur choisit.
Le malheureux peut inclure des caractères de types / * etc. qui ne sont pas autorisés pour l'enregistrement. par conséquent je veux tester si ce malheureux ne fait pas cette erreur.

Voilà le code :

Sub Testdenom()
If ActiveCell.Value Like '*/*' _
Or ActiveCell.Value Like '*\\*' _
Or ActiveCell.Value Like '*<*' _
Or ActiveCell.Value Like '*>*' _
Or ActiveCell.Value Like '*_**' _
Or ActiveCell.Value Like '*_?*' _
Or ActiveCell.Value Like '*!*' _
Or ActiveCell.Value Like '*:*' _
Or ActiveCell.Value Like '*;*' Then MsgBox 'Votre nom n'est pas valable'
End Sub

Au passage je ne sais pas gérer le *** pour interdire l'*

Mon problème c est que le code ne fonctionne pas avec le endif à la fin
PAr conséquent je le teste en l'enlevant
Et CA FONCTIONNE !!!!

Deux questions :

Comment gérer l'*
Pourquoi ne veut il pas de mon endif ??????????


Merci à tous