code39 バーコードの生成
Crystal Reports、MS Excel、MS Access でシームレスに実装可能
MS Excel スプレッドシートでの code39 バーコードの生成
1. 信頼できるマクロ設定を初期化します
Excel 2007 / 2010 / 2013 / 2016 / 2019 / 2021 / 2024 / 365 の場合： Office メニューの ファイル ＆rarr; オプション ＆rarr; トラストセンター ＆rarr; トラストセンターの設定 ＆rarr; マクロの設定 をクリックし、「すべてのマクロを有効にする」 を選択します。
従来の Office (2000/2003)： ツール ＆rarr; マクロ ＆rarr; セキュリティ の順に移動し、「低」に設定します。
2. Visual Basic ウィンドウを起動します
ALT + F11 キーを同時に押して、内蔵の VBA エディターダッシュボードパネルを呼び出します。
3. ライブラリ参照への接続を確立します
エディター内で、ツール ＆rarr; 参照設定 をクリックします。参照先の検索ダイアログウィンドウで、cruflbcs.dll モジュールファイルがある場所（通常は C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil ディレクトリフォルダ内）を直接指定します。crUFLBcs 5.0 Type Library にチェックが入っていることを確認し、確定します。
4. モジュール自動化マクロをインポートします
Ctrl + M を押して、ファイルのインポートウィンドウコンテキストパネルを開きます。上述のユーティリティパスから barcodesoft.bas ファイルを選択します。ファイルが見つからない場合は、cruflbcs.zip のアーカイブ ZIP リンクからパッケージソースを取得してください。
5. 列の数式設定を実装します
Visual Basic レイアウトエディターを閉じて、スプレッドシートのワークスペースグリッドパネルにフォーカスを戻します。標準のセル参照構文パラメータを使用して、対象となるワークブックの行内に処理用の式を実行します：
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
Visual Basic エディターを閉じて、スプレッドシートに戻ります。これで、データをエンコードするために次のマクロを使用できます：code39。処理する大量のデータがある場合は、マクロを列全体にコピー＆ペーストするだけで、すべてのデータがすぐにエンコードされます。
6. code39 バーコードのフォントスタイルプロパティを設定します
対象の出力参照セルフィールド（例: B1）を右クリックし、「セルの書式設定」 プロパティを選択します。フォント設定タブのレイアウトマッピングオプションで、UpcEanM を追跡するフォント識別子名を選択します。フォントスタイルが 標準 に設定され、下線 が なし に設定されていることを確認します。
OK をクリックすると、Excel スプレッドシートに code39 バーコードが表示されるようになります。
パッケージには、さまざまなサイズとスタイルの 14 種類の TrueType フォントが含まれています：
目視可能テキストあり：Code39XXL, Code39XL, Code39L, Code39M, Code39S, Code39XS, Code39XXS
目視可能テキストなし：Code39XXL, Code39XL, Code39L, Code39M, Code39S, Code39XS, Code39XXS
各フォントは異なるアスペクト比で設計されているため、アプリケーションの要件に最も適したフォントを選択できます。