Microsoft AccessでAztecコードを生成する方法

BarcodesoftフォントとMS Access VBAを使用して、大容量2Dマトリックスバーコードを統合するためのステップバイステップの開発者ガイド。

Aztecコードとは？

Aztecコード（アズテックコード）は、大容量のデータエンコーディングを特徴とする堅牢な2Dマトリックスバーコードシンボルです。従来のバーコードとは異なり、標準ASCIIと拡張ASCII文字の両方を効率的に処理できるため、医療、運輸、チケット発行業界に最適です。

1 crUFLbcs.dll の登録

デモ版をインストールし、DOSプロンプトを開きます（Windows 7/10/11の場合は管理者として実行）。次のコマンドを入力してDLLを登録します。

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

2 マクロのセキュリティを有効にする

バーコード生成を許可するために、マクロ設定を調整します。Access 2007-2019+ の場合は以下に移動してください：

Accessのオプション » トラストセンター » トラストセンターの設定 » マクロの設定 » すべてのマクロを有効にする

3 VBAの設定と参照設定

ALT + F11 を押して、Visual Basic Editor を開きます。
ツール » 参照設定 を選択し、「参照」ボタンをクリックして cruflbcs.dll を指定します。
crUFLBcs 4.0 Type Library にチェックを入れます。
CTRL + M を押して、barcodesoft.bas をインポートします。

VBA コードスニペット

Public Function Aztec(strToEncode As String) As String
    Dim obj As cruflBCS.CAztec
    Set obj = New cruflBCS.CAztec
    Aztec = obj.EncodeCR(strToEncode, 0, 0, 0)
    Set obj = Nothing
End Function

4 Aztecバーコードを描画する

デザインビューでテキストボックスを作成し、テーブル名とフィールド名を使用して コントロールソース を次のように設定します：

=Aztec([テーブル名.フィールド名])

最後に、テキストボックスを右クリックして プロパティ を開き、フォントを BcsAztec に設定します。