Pour avoir 222 avec une police Code39, je tape sur mon clavier 222, et pour avoir 2 22, je tape 2 22.Quel caractère ou astuce pour avoir un espace dans un code à barre en code 39 dans excel?
Si on utilise la barre d'espace on crée un trou dans le code à barres
Bonjour Victor21,
Bien d'accord avec toi, mais ce ne pas bon.
espace (en ascii) créé un large espace dans le code barre, alors que ce devrait un caractère "normal" dans le code barre, ce que j'obtiens avec un logiciel spécifique, mais que je n'arrive pas à traduire sous Excel
Merci
Public Function Code39$(chaine$)
'V 1.0
'Paramètres : une chaine
'Retour : * une chaine qui, affichée avec la police CODE39.TTF, donne le code barre
' * une chaine vide si paramètre fourni incorrect
Dim i%
Code39$ = ""
If Len(chaine$) > 0 Then
'Vérifier si caractères valides
For i% = 1 To Len(chaine$)
Select Case Asc(Mid$(chaine$, i%, 1))
Case 32, 36, 37, 43, 45 To 57, 65 To 90
Case Else
i% = 0
Exit For
End Select
Next
If i% > 0 Then
Code39$ = "*" & chaine$ & "*"
End If
End If
End Function