Générer des codes-barres Code 128

1. Faites un clic droit sur l'Invite de commandes et exécutez-la en tant qu'administrateur.

Pour enregistrer la DLL 64 bits, saisissez les commandes suivantes :

cd "C:\Program Files\Common Files\Barcodesoft\FontUtil"
%systemroot%\System32\regsvr32.exe cruflbcs_x64.dll

Saisissez les commandes suivantes pour enregistrer cruflbcs.dll :

cd "C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil"
regsvr32.exe cruflbcs.dll

Si la fenêtre contextuelle suivante apparaît, l'enregistrement a réussi.

2. Lancez Microsoft® Excel®.

Si vous utilisez Excel 2000 ou 2003, cliquez sur le menu ===> Outils (Tools) ==> Macro ===> Sécurité (Security). Sélectionnez le niveau de sécurité Faible (Low).

Si vous utilisez Excel 2007 / 2010 / 2013 / 2016 / 2019, cliquez sur le bouton Microsoft Office.

Cliquez ensuite sur Options Excel (Excel Options), puis choisissez Centre de gestion de la confidentialité (Trust Center). Dans la catégorie Paramètres des macros (Macro Settings), sous Paramètres des macros, sélectionnez "Activer toutes les macros" (Enable all macros) comme illustré ci-dessous.

3. Appuyez sur ALT + F11 pour ouvrir l'éditeur Microsoft® Visual Basic.

4. Dans l'éditeur Visual Basic, choisissez le menu Outils (Tools) ===> Références (References). Une boîte de dialogue s'ouvre. Cliquez sur le bouton Parcourir (Browse) et sélectionnez cruflbcs.dll dans votre dossier de travail. Il se trouve généralement dans le dossier C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil. Cochez la case à côté de crUFLBcs 1.0 Type Library comme illustré ci-dessous, puis cliquez sur le bouton OK.

5. Appuyez sur Ctrl+M, une boîte de dialogue s'affiche. Sélectionnez barcodesoft.bas dans le dossier C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil. Cliquez ensuite sur "Ouvrir" (Open).

Si vous ne trouvez pas barcodesoft.bas, téléchargez-le depuis Code128.

6. Fermez l'éditeur Visual Basic et revenez à votre feuille de calcul. Vous pouvez désormais utiliser les macros suivantes pour encoder les données : Code128. Lorsque vous avez une grande quantité de données à traiter, copiez et collez simplement la macro sur toute la colonne et toutes vos données seront encodées instantanément.
=Code128A(xxx) =Code128B(xxx) =Code128C(xxx)

Utilisez une référence de cellule pour remplacer xxx dans les formules, comme illustré ci-dessous.

7. Faites un clic droit sur la cellule B1 et choisissez Format de cellule (Format Cell) dans le menu contextuel. Cliquez ensuite sur Police (Font) pour appliquer le type de police approprié à la cellule, tel que Code128mHr.