Discussion :

[stitchbouck]

Bonjour,

je cherche désespérément à ajouter une étoile en début et fin de caractère.

Je travaille sur de l’étiquetage de produit, avec un code barre sous police "Code 39". Sauf que comme une buse, je n'ai pas mis les * en début et fin de séquence. Ces étoiles sont obligatoires pour que les scanners puissent lire le code à barre (ça indique où commence et où finit la lecture, à priori, ce que j'ignorai).

J'ai essayé,avec l’enregistreur de macro pour repérer le code, de lui faire chercher toutes les séquences en Code 39. Mais sur le code VBA, cette identification ne parait pas !!! Pourtant la recherche /remplacement fonctionne et il repère très bien les chaine de caractère en code 39...

Les séquences sont sous un format 4 lettres-4 chiffres (exemple CONS-1525 ; EPIN-0022;...) et je dois les transformer, toujours en police Code 39, en *LLLL-####* (exemple : *CONS-1525* ; *EPIN-0022*)

Si quelqu'un a une idée, je suis preneur...

merci !!

[axelair2]

Salut,

Pour la recherche de ton texte tu peux essayer avec un Like si tu n'as pas d'autre texte qui ressemble à "*-*".
Si tu bricoles ta macro avec quelque chose comme cela ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If Texte Like "*-*") Then
 
Texte = "*" & Texte & "*"
 
End If

A+

[stitchbouck]

Bonjour,

on m'a trouvé une solution toute bête que je ne connaissais pas sur une option du "recherche et remplace", que voici :

Citation :
Dans la boîte de dialogue Recherche-Remplace, tu coches "Utiliser les caractères génériques".
Ensuite :
Rechercher : ([A-Z]{4;4}-[0-9]{4;4})
Remplacer par : *\1*
Fin de citation

ça a parfaitement fait son affaire.

merci pour le coup de main en tout cas !!