Code 39 Barcode
Erzeugen Sie Code39 barcode in einer Excel-Tabelle
1. Installieren Sie die code39-Demo auf Ihrem Computer.2. Klicken Sie mit der rechten Maustaste auf die Eingabeaufforderung und führen Sie die Eingabeaufforderung als Administrator aus.

Geben Sie die folgenden Befehle ein, um cruflbcs.dll zu registrieren
cd "C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil"
regsvr32.exe cruflbcs.dll

Um die 64-Bit-DLL zu registrieren, geben Sie bitte die folgenden Befehle ein
cd "C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil"
%systemroot%\System32\regsvr32.exe cruflbcs_x64.dll
Wenn das folgende Fenster erscheint, war Ihre Registrierung erfolgreich.

3. Starten Microsoft® Excel®.
Wenn Sie Access 2000 oder 2003 verwenden, klicken Sie auf das Menü ===> Tools ==> Macro ===> Security. Wählen Sie die Sicherheitsstufe Niedrig.

Wenn Sie Access 2007/2010/2013/2016/2019 verwenden, klicken Sie auf die Microsoft Office-Schaltfläche.
Klicken Sie auf Optionen ==> Vertrauensstellungscenter ==> Makroeinstellungen und wählen Sie "Alle Makros aktivieren".

4. Drücken Sie ALT + F11, um den Microsoft® Visual Basic-Editor zu öffnen.

5. Wählen Sie im Visual Basic-Editor das Menü Extras ===> Verweise. Es öffnet sich ein Dialog. Klicken Sie auf die Schaltfläche Durchsuchen, und wählen Sie aus dem 'C:\Program File (x86)\CommonFiles\Barcodesoft\Fontutil' -Ordner die Datei cruflbcs.dll aus.
Wählen Sie crUFLBcs 4.0. Klicken Sie dann auf die Schaltfläche OK.

6. Drücken Sie Strg + M, um ein Dialogfeld zu öffnen. Wählen Sie barcodesoft.bas im Ordner 'C:\Program File (x86)\CommonFiles\Barcodesoft\Fontutil'. Klicken Sie dann auf "Öffnen".

Sie können aus dem folgenden Codeausschnitt kopieren.
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
7. Schließen Sie Visual Basic. Kehren Sie zu Ihrer Excel-Tabelle zurück. Verwenden Sie das folgende Makro, um Daten zu codieren:
=Code39(A1)

8. Wählen Sie Code39mHr als Schriftart.

9. OK klicken. Sie sehen Code39 barcode in Ihrer Excel-Tabelle.





