QRCode

Erzeugen Sie QRCode in einer Excel-Tabelle

1. Herunterladen qrcode. Kopieren Sie die Datei bcsqrcodeS.ttf in den Ordner "c:\Windows\fonts".

2. Klicken Sie mit der rechten Maustaste auf die Eingabeaufforderung und führen Sie die Eingabeaufforderung als Administrator aus.
QR code command prompt as administrator

Geben Sie die folgenden Befehle ein, um cruflbcs.dll zu registrieren


                        cd "C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil"

                        regsvr32.exe cruflbcs.dll

register cruflbcs.dll commands for QR code

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.
register cruflbcs.dll succeeded

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.
QRCode Macro Security

Wenn Sie Access 2007/2010/2013/2016/2019 verwenden, klicken Sie auf die Microsoft Office-Schaltfläche.
Office 2010 button

Klicken Sie auf Optionen ==> Vertrauensstellungscenter ==> Makroeinstellungen und wählen Sie "Alle Makros aktivieren".

QRCode Macro Setting

4. Drücken Sie ALT + F11, um den Microsoft® Visual Basic-Editor zu öffnen.
QRCode 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 (x86)\CommonFiles\Barcodesoft\Fontutil' -Ordner die Datei cruflbcs.dll aus.
Wählen Sie crUFLBcs 4.0. Klicken Sie dann auf die Schaltfläche OK.

QRCode füge Referenz

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".

QRCode import vba

Sie können aus dem folgenden Codeausschnitt kopieren.

Public Function QRCode(strToEncode As String) As String
Dim obj As cruflBCS.CQRCode
Set obj = New cruflBCS.CQRCode
QRCode = obj.EncodeCR(strToEncode, 0, 0, 0)
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:

=qrcode(A1)

QRCode Excel macro

8. Klicken Sie mit der rechten Maustaste auf Zelle B1 und wählen Sie im Kontextmenü die Option "Zelle formatieren".

9. Wählen Sie BcsqrcodeS als Schriftart.
QRCode typeface excel

10. Klicken Sie auf die Registerkarte Ausrichtung und wählen Sie "Text umbrechen".
QRCode alignment excel

11. OK klicken. Sie sehen qrcode in Ihrer Excel-Tabelle. Zwischen den Zeilen des QRCode besteht möglicherweise eine kleine Lücke. Sie können jedoch qrcode drucken und scannen. Die True Type-Schriftart von bcsqrcodes reduziert die Lücke auf das Minimum.

QRCode excel