UPC-A バーコードの生成

Crystal Reports、MS Excel、MS Access でシームレスに実装可能

MS Excel スプレッドシートでの UPC-A バーコード生成

1. マクロのセキュリティ設定の初期化

Excel 2007 / 2010 / 2013 / 2016 / 2019 / 2021 / 2024 / 365 の場合: Office メニューの「ファイル」 → 「オプション」 → 「トラスト センター」 → 「トラスト センターの設定」 → 「マクロの設定」をクリックし、「すべてのマクロを有効にする」を選択します。

VBA macro security settings overview

従来の Office (2000/2003): 「ツール」 → 「マクロ」 → 「セキュリティ」に移動し、設定を「低」に設定します。

2. Visual Basic ウィンドウの起動

キーボードの ALT + F11 を押して、内蔵の VBA エディターパネルを開きます。

3. ライブラリ参照設定の確立

エディター内で、「ツール」 → 「参照設定」をクリックします。検索ウィンドウで、モジュールファイル cruflbcs.dll の場所(通常は C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil ディレクトリ内)を直接指定します。「crUFLBcs 1.0 Type Library」のチェックボックスにチェックが入っていることを確認してください。

VBA library import dialog step

4. モジュール自動化マクロのインポート

Ctrl + M を押して、ファイルのインポートパネルを開きます。上記のユーティリティパスから barcodesoft.bas ファイルコンポーネントを選択します。お持ちでない場合は、zip ファイルのリンク cruflbcs.zip からパッケージフォントをダウンロードしてください。

VBA module layout architecture

5. 列式設定の実装

Visual Basic エディターを閉じて、ワークシートの作業領域に戻ります。目的のワークブックの行内で、標準的なセルを使用して構文パラメータを参照し、処理用の式を実行します:

=upca(A1)

Visual Basic エディターを閉じて、Excel シートに戻ります。これで、データをエンコードするために次のマクロを使用できます:UPCA。大量のデータを処理する必要がある場合は、マクロをコピーして列全体に貼り付けるだけで、すべてのデータが即座にエンコードされます。

ヒント:UPC コードがゼロで始まる場合は、Excel セルの先頭のゼロの前にアポストロフィ(')を入力してください。そうしないと、Excel によって先頭のゼロが削除されてしまいます。

Excel computation cells layout view

6. UPC-A バーコードフォントのスタイルプロパティ設定

参照出力セル(例:B1)を右クリックし、「セルの書式設定」を選択します。「フォント」設定タブで、書体識別子として UpcEanM を選択します。フォントスタイルが 「標準」に設定され、「下線」「なし」に設定されていることを確認してください。

Font setup panel properties view

「OK」をクリックすると、Excel ワークシート内に UPC-A バーコードが表示されます。
パッケージには、UpcEanXXL、UpcEanXL、UpcEanL、UpcEanM、UpcEanS、UpcEanXS の6つの TrueType フォントが含まれています。各フォントは異なるアスペクト比で設計されているため、アプリケーションの要件に最も適したものを選択できます。