• GS1-Databar barcode download
  • GS1-Databar barcode software order

GS1-Databar Barcode

Erzeugen Sie gs1-Databar barcode in einer Excel-Tabelle

1. Installieren Sie die gs1-Databar-Demo auf Ihrem Computer.

2. Öffnen Sie die DOS-Eingabeaufforderung als Administrator. Geben Sie die folgenden Befehle ein

CD C:\Program Files\Common Files\Barcodesoft\FontUtil
regsvr32 crUFLbcs.dll

gs1-Databar barcode excel DLL Registrierung

3. Starten Microsoft® Excel®.

Wenn Sie Access 2000 oder 2003 verwenden, klicken Sie auf das Menü ===> Tools ==> makro ===> Security. Wählen Sie die Sicherheitsstufe Niedrig.
gs1-Databar barcode makro Security

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

gs1-Databar barcode makro Setting

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

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\CommonFiles\Barcodesoft\Fontutil' -Ordner die Datei cruflbcs.dll aus.
Wählen Sie crUFLBcs 4.0. Klicken Sie dann auf die Schaltfläche OK.

gs1-Databar barcode füge Referenz

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

gs1-Databar barcode import vba

Sie können aus dem folgenden Codeausschnitt kopieren.

Public Function Databar14(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
Databar14 = obj.Databar14(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarStk(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarStk = obj.DatabarStack(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarStkOmni(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarStkOmni = obj.DatabarStkOmni(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarLtd(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarLtd = obj.DatabarLtd(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarExp(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarExp = obj.DatabarExp(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarExpStk(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarExpStk = obj.DatabarExpStk(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:

=databar14(A1)

gs1-Databar barcode Excel makro

8. Wählen Sie BcsDatabarM als Schriftart.
gs1-Databar barcode schriftart excel

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

  • gs1-Databar barcode software herunterladen
  • gs1-Databar barcode barcode software kaufen