Bonjour,
Le message signifie qu'il manque
End Sub à la fin de ta procédure !
Pour ce qui concerne le code-barres 128 personnellement j'utilise une police de caractère.
Fais une recherche sur Google pour télécharger une police de caractère AN128 ou un truc comme ça !