Generate Bookland Barcode in MS Access database, MS Excel spreadsheet, and Crystal Reports

前書き
Crystal ReportsからUPCAを印刷する
MS Excelから UPCAを印刷
MS AccessからUPCAを印刷

キーワード:
Bookland バーコード, ISBN, ISO/IEC 16388:2007

Unique Country Code (UCC) お European Article Number (EAN)は、書籍出版社に3桁のプレフィックスを割り当てました。プレフィックスは978または979です。

国際標準図書番号（ISBN）は、カタログ図書に割り当てられる9桁の番号です。 ISBNは本の識別子として使用されます。

プレフィックスと9桁のISBN、およびモジュロ11チェックサムがブックランドバーコードを構成します。

Booklandバーコードフォントのマッピングテーブルは次のとおりです。

文字	マッピング	文字	マッピング
開始	[	終止	]
補充開始	{	補充終止	}
中央分離	\|	補充分離	\
テキストのみ	0xE0 - 0xE9	UPCE 終止	'
左手B人間が読める文字	PQWERTYUIO	左手B人間が読める文字がない	pqwertyuio
右手人間が読める文字	:ASDFGHJKL	右手人間が読める文字がない	;asdfghjkl
左手A上記の人間が読める文字	/zxcvbnm,.	左手B上記の人間が読める文字	?ZXCVBNM<>
左手 A 以下の人間が読める文字	0123456789	左手 A 下に人間が読める文字がない	~!#&40;#$%^&*(<>

Booklandはデータの後ろにチェックデジットを追加する必要があります。

あなたがバーコードを印刷するためにBarcodesoft Booklandフォントを使うならば、あなたのためにチェックディジットを計算するために我々のエンコーダを使ってください。 VBAとC言語のソースコードもあります。

以下に示すように、パッケージには6つのフォントがあります。各フォントは、フォント名ごとに縦横比を示しています。たとえば、UpcEanMは「中縦横比」を意味します。

UpcEanXXLは「XXL縦横比」を意味します。

Barcodesoft Booklandデモ版には「デモ」透かしがあります。

Barcodesoft Booklandバーコードフォントは、TrueType、PostScript、PCL、SVG、Open Type（eot）、およびWeb Open Font Format（woff / woff2）で利用できます。ユーザーは、BooklandフォントをAdobe PDFファイルに埋め込むことができます。

これはBarcodesoft Booklandバーコードフォントのリストです

アスペクト比	フォント
XS	UPCEANXS
S	UPCEANS
M	UPCEANM
L	UPCEANL
XL	UPCEANXL
XXL	UPCEANXXL

これはBarcodesoftの Booklandソフトウェアの価格表です

ライセンス	シングルユーザー	5人のユーザー	10人のユーザー	オフィス	会社	開発者	5-開発者	10-開発者	無制限開発者
価格	CAD159	CAD299	CAD399	CAD599	CAD799	CAD999	CAD1199	CAD1399	CAD1999

Crystal Reportsから Booklandを印刷する

1. オープンクリスタルレポート。式フィールドを右クリックして、コンテキストメニューから[新規作成...]を選択します。

[名前]テキストボックスに「Bookland」と入力し、[OK]をクリックします。

Bookland 新規式 crystal reports

2. 関数 ==> その他の機能 ==> COM および .NET UFL (u212com.dll)、 "BCSLinearBookland"機能を選択します。
Bookland crystal reports UFL

3. Bookland式のパラメータとしてデータベースフィールドに入力します。「保存して閉じる」ボタンをクリックしてください。

4. Bookland式フィールドをあなたの水晶の報告書にドラッグしてください。あなたはいくつかの16進数コードを見るでしょう。心配しないで！あなたはまだフォントを使っていません。

Bookland crystal reports 式式フィールド

5. [Bookland]式フィールドを右クリックします。コンテキストメニューから[フィールドの書式]を選択します。それからフォントとして "UpcEanM"を選択してください。

6. OKボタンをクリックしてください。レポートに Booklandと表示されます。 Bookland crystal reports

MS Excelスプレッドシートで Booklandを生成

1. ダウンロード Excel用 'Bookland'.
TrueTypeフォント「UpcEanM.ttf」を「c：\ Windows \ Fonts」フォルダにコピーします。

2. 管理者としてDOSプロンプトを開きます。以下のコマンドを入力して、「cruflbcs.dll」を登録します。

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

Bookland DLL DOS 登録

3. Microsoft® Excel®を起動します。

Excel 2000またはExcel 2003を使用している場合は、[メニュー] ===> [ツール] ==> [マクロ] ===> [セキュリティ]の順にクリックします。低セキュリティレベルを選択します。
Bookland マクロセキュリティ

Excel 2007/2010/2013/2016/2019を使用している場合は、Microsoft Officeボタンをクリックしてください。
Office 2010 button Office 2016 button Office 2019 button
[オプション] => [セキュリティセンター] ==> [マクロの設定]の順にクリックし、[すべてのマクロを有効にする]を選択します。

Bookland マクロコンフィグレーション

4. Alt + F11キーを押してMicrosoft®Visual Basic Editorを開きます。
Bookland VBA

5. Visual Basicエディタから、メニューツール===>参照を選択します。ダイアログがポップアップします。 [参照]ボタンをクリックし、 'C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil'フォルダからcruflbcs.dllを選択します。 crUFLBcs 4.0を選択してください。そしてOKボタンをクリックしてください。

Bookland 参照を置く

6. Ctrl + Mを押します。ダイアログがポップアップします。 C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil フォルダの下のbarcodesoft.basを選択します。次に「開く」をクリックします。

Bookland インポート vba

下記のコードスニペットからコピーすることもできます。

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

7. Visual Basicを閉じて、Excelスプレッドシートに戻ります。次のマクロを使用してデータをエンコードしてください。Bookland。処理するデータがたくさんある場合は、マクロを列/行全体にコピーするだけで済みます。すべての Booklandはすぐに準備ができています。

=Bookland(xx)

ヒント：UPCコードがゼロで始まる場合、ExcelセルのUPCコードの最初のゼロの前にアポストロフィ（ '）を入力してください。それ以外の場合、UPCコードの最初のゼロはExcelによって省略されます。

Bookland Excel マクロ

8. セルB1を右クリックして、コンテキストメニューからセルの書式設定を選択します。
フォントタブをクリックして、フォントとしてUpcEanMを選択します。
Bookland フォント excel

9. OKをクリックしてください。 ExcelのスプレッドシートにBooklandと表示されます。 Booklandの行の間に小さな隙間があるかもしれません。ただし、UpcEanM TrueTypeフォントはこのギャップを最小限に抑えるように設計されているため、 Booklandを印刷してスキャンしても問題にはなりません。

MS Accessデータベースで Booklandを生成します

Barcodesoftの Booklandソフトウェアを使えば、MS Accessデータベースに Booklandを簡単に印刷できます。

1. あなたのコンピュータに Booklandデモをインストールしてください。

2. 管理者としてDOSプロンプトを開きます。以下のコマンドを入力して、「cruflbcs.dll」を登録します。

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

Bookland Access DLL DOS 登録

3. Microsoft®Access®を起動します。

Access 2000またはAccess 2003を使用している場合は、[メニュー] ===> [ツール] ==> [マクロ] ===> [セキュリティ]の順にクリックします。低セキュリティレベルを選択します。
Bookland Access マクロセキュリティ

Access 2007/2010/2013/2016/2019を使用している場合は、Microsoft Officeボタンをクリックしてください。
Office 2010 button Office 2016 button Office 2019 button
[オプション] => [セキュリティセンター] ==> [マクロの設定]の順にクリックし、[すべてのマクロを有効にする]を選択します。

Bookland Access マクロコンフィグレーション

4. Alt + F11キーを押してMicrosoft®Visual Basic Editorを開きます。
Bookland Access VBA

5. Visual Basicエディタから、メニューツール===>参照を選択します。ダイアログがポップアップします。 [参照]ボタンをクリックし、 'C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil'フォルダからcruflbcs.dllを選択します。 crUFLBcs 4.0を選択してください。そしてOKボタンをクリックしてください。

Bookland 参照を置く

6. Ctrl + Mを押します。ダイアログがポップアップします。 C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil フォルダの下のbarcodesoft.basを選択します。次に「開く」をクリックします。

Bookland インポート vba

下記のコードスニペットからコピーすることもできます。

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

7. Visual Basicを閉じてAccessデータベースに戻ります。テキストボックスを作成します。その制御元にこのマクロを入力します。
=bookland([data.code])

'data'はデータベースのテーブル名、 'code'はデータベースのフィールド名です。

Bookland バーコード access マクロ

8. テキストボックスを右クリックします。コンテキストメニューから[プロパティ]を選択します。フォントとしてUpcEanMを選択してください。

Bookland access フォント

MicrosoftおよびOfficeのロゴは、米国Microsoft Corporationの米国およびその他の国における商標または登録商標です。