Générer des codes-barres code39
Implémentez-les de manière transparente dans Crystal Reports, MS Excel et MS Access
Générer un code-barres code39 dans une feuille de calcul MS Excel
1. Initialiser les paramètres de sécurité des macros approuvées
Pour Excel 2007 / 2010 / 2013 / 2016 / 2019 / 2021 / 2024 / 365 : Cliquez sur le menu Office Fichier options → Centre de gestion de la confidentialité → Paramètres du Centre de gestion de la confidentialité → Paramètres des macros, sélectionnez "Activer toutes les macros".
Anciennes versions d'Office (2000/2003) : Naviguez via Outils → Macro → Sécurité, configurez sur Faible.
2. Lancer la fenêtre Visual Basic
Appuyez simultanément sur ALT + F11 pour afficher le volet du tableau de bord de l'éditeur VBA intégré.
3. Établir les connexions de référence de bibliothèque
Dans l'éditeur, cliquez sur Outils → Références. Dans la fenêtre de recherche de chemin, pointez directement vers le fichier module cruflbcs.dll (généralement situé dans le dossier C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil). Assurez-vous que la case à cocher pour crUFLBcs 5.0 Type Library est bien validée.
4. Importer les macros d'automatisation de module
Appuyez sur Ctrl + M pour ouvrir la fenêtre contextuelle d'importation de fichier. Choisissez les composants du fichier barcodesoft.bas depuis le chemin des utilitaires mentionné ci-dessus. S'ils sont manquants, récupérez les sources du package via les liens d'archive zip sur cruflbcs.zip.
5. Implémenter les configurations de formules de colonnes
Fermez l'éditeur Visual Basic pour revenir aux panneaux de la grille de votre espace de travail de feuille de calcul. Exécutez les expressions de traitement dans les lignes de classeur souhaitées via la syntaxe standard de référencement des cellules :
Public Function Code39(strToEncode As String) As String
Dim obj As cruflBCS.CLinear
Set obj = New cruflBCS.CLinear
Code39 = obj.Code39(strToEncode)
Set obj = Nothing
End Function
Fermez l'éditeur Visual Basic et retournez sur votre feuille de calcul. Maintenant, vous pouvez utiliser la macro suivante pour encoder les données : code39 . Lorsque vous avez beaucoup de données à traiter, il vous suffit de copier et coller la macro sur toute la colonne et toutes les données seront encodées immédiatement.

6. Définir les propriétés du style de police du code-barres code39
Faites un clic droit sur la cellule de référence de sortie cible (ex. B1), en choisissant les propriétés "Format de cellule". Dans l'onglet des paramètres de police, sélectionnez l'identifiant de police nommé UpcEanM. Assurez-vous que le style de police est défini sur Normal avec Soulignement défini sur Aucun.
Cliquez sur OK et vous devriez maintenant pouvoir voir le code-barres code39 dans votre feuille de calcul Excel.
Le package comprend 14 polices TrueType dans une variété de tailles et de styles :
Avec texte lisible par l'homme : Code39XXL, Code39XL, Code39L, Code39M, Code39S, Code39XS et Code39XXS ;
Sans texte lisible par l'homme : Code39XXL, Code39XL, Code39L, Code39M, Code39S, Code39XS et Code39XXS.
Chaque police est conçue avec un rapport d'aspect différent, vous permettant de sélectionner celle qui convient le mieux aux exigences de votre application.