MS Excelスプレッドシート、MS Accessデータベース、およびCrystal ReportsでQRCodeバーコードを生成できます
キーワード: QRCode, ISO/IEC 18004:2006
あなたがQRコードを生成したいならば、あなたは最善の解決策を見つけました。答えはBarcodesoft QRCodeソフトウェアです。
QRコードはクイックレスポンスコードとも呼ばれます。 QRコードは、2Dマトリックスバーコードシンボルです。
QRコードマトリックスのサイズは21×21モジュールと177×177モジュールの間です。各モジュールは黒か白の正方形です。
QRCodeは英数字と句読文字の両方をエンコードできます。 8ビットのJIS文字と漢字（Shift JIS文字）もエンコードできます。モデル2のQRコードは、最大1500個の日本語漢字を保持できます。
そのモジュール配置アルゴリズムはQRCodeを特別なものにします。 QRコードはエラーチェックと訂正のためにリードソロモンアルゴリズムを使用します。 QRコードには、L07、M15、Q25、H30の4種類のエラー訂正レベルがあります。より高いレベルはより少ないデータ容量とより少ないデコードエラーの可能性を意味します。
Windows PCでデータをエンコードするには、Barcodesoft QRCode EncoderまたはcrUFLbcs.dllのいずれかを使用できます。
Barcodesoft QRCode Demoは、「Demo」の透かしがあっても完全に機能します。
日本語以外のオペレーティングシステムを使用していて、WindowsアプリケーションにQRCodeバーコードシンボルをスキャンする場合は、Barcodesoft Keyboard Wedge Emulationプログラムを使用してください。 RS-232ポート信号を傍受し、キーボード入力をエミュレートします。
番号
定義済みフォーマット
番号
エラー訂正レベル
1
15 X 15 コンパクトサイズ
1
5%
2
19 X 19
2
10%
3
19 X 19 コンパクトサイズ
3
15%
4
23 X 23
4
20%
5
23 X 23 コンパクトサイズ
5 (default value)
23%
6
27 X 27
6
25%
7
27 X 27 コンパクトサイズ
7
30%
8
31 X 31
8
35%
9
37 X 37
9
40%
10
41 X 41
10
45%
11
45 X 45
11
50%
12
49 X 49
12
55%
13
53 X 53
13
60%
14
57 X 57
14
65%
15
61 X 61
15
70%
16
67 X 67
16
75%
17
71 X 71
17
80%
18
75 X 75
18
85%
19
79 X 79
19
90%
20
83 X 83
21
87 X 87
22
91 X 91
23
95 X 95
24
101 X 101
25
105 X 105
26
109 X 109
27
113 X 113
28
117 X 117
29
121 X 121
30
125 X 125
31
131 X 131
32
135 X 135
33
139 X 139
34
143 X 143
35
147 X 147
36
151 X 151
これはBarcodesoftの QRCodeソフトウェアの価格表です
ライセンス
シングルユーザー
5人のユーザー
10人のユーザー
オフィス
会社
開発者
5-開発者
10-開発者
無制限開発者
価格
CAD299
CAD399
CAD599
CAD799
CAD999
CAD1199
CAD1399
CAD1999
CAD2999
MS Accessデータベースで QRCodeを生成します
Barcodesoftの QRCodeソフトウェアを使えば、MS Accessデータベースに QRCodeを簡単に印刷できます。
1. あなたのコンピュータに QRCodeデモをインストールしてください。
2. 管理者としてDOSプロンプトを開きます。 以下のコマンドを入力して、「cruflbcs.dll」を登録します。
CD C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil
regsvr32 crUFLbcs.dll
3. Microsoft®Access®を起動します。
Access 2000またはAccess 2003を使用している場合は、[メニュー] ===> [ツール] ==> [マクロ] ===> [セキュリティ]の順にクリックします。 低セキュリティレベルを選択します。
Access 2007/2010/2013/2016/2019を使用している場合は、Microsoft Officeボタンをクリックしてください。
[オプション] => [セキュリティセンター] ==> [マクロの設定]の順にクリックし、[すべてのマクロを有効にする]を選択します。
4. Alt + F11キーを押してMicrosoft®Visual Basic Editorを開きます。
5. Visual Basicエディタから、メニューツール===>参照を選択します。 ダイアログがポップアップします。 [参照]ボタンをクリックし、 'C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil'フォルダからcruflbcs.dllを選択します。
crUFLBcs 4.0を選択してください。 そしてOKボタンをクリックしてください。
6. Ctrl + Mを押します。 ダイアログがポップアップします。 C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil フォルダの下のbarcodesoft.basを選択します。 次に「開く」をクリックします。
下記のコードスニペットからコピーすることもできます。
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)
;最初のパラメータはエンコードする文字列です。
;2番目のパラメータはインデックス番号です。0に設定してください。
;3番目のパラメーターは事前定義フォーマットで、ゼロに設定します。
;4番目のパラメータはエラー訂正レベルです。0に設定してください。
Set obj = Nothing
End Function
7. Visual Basicを閉じてAccessデータベースに戻ります。 テキストボックスを作成します。 その制御元にこのマクロを入力します。
=qrcode([data.code])
'data'はデータベースのテーブル名、 'code'はデータベースのフィールド名です。
8. テキストボックスを右クリックします。 コンテキストメニューから[プロパティ]を選択します。 フォントとしてBcsqrcodeを選択してください。
MicrosoftおよびOfficeのロゴは、米国Microsoft Corporationの米国およびその他の国における商標または登録商標です。
MS Excelスプレッドシートで QRCodeを生成
1. ダウンロード Excel用 'QRCode'.TrueTypeフォント「bcsqrcodes.ttf」を「c：\ Windows \ Fonts」フォルダにコピーします。
2. 管理者としてDOSプロンプトを開きます。 以下のコマンドを入力して、「cruflbcs.dll」を登録します。
CD C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil
regsvr32 crUFLbcs.dll
3. Microsoft® Excel®を起動します。
Excel 2000またはExcel 2003を使用している場合は、[メニュー] ===> [ツール] ==> [マクロ] ===> [セキュリティ]の順にクリックします。 低セキュリティレベルを選択します。
Excel 2007/2010/2013/2016/2019を使用している場合は、Microsoft Officeボタンをクリックしてください。
[オプション] => [セキュリティセンター] ==> [マクロの設定]の順にクリックし、[すべてのマクロを有効にする]を選択します。
4. Alt + F11キーを押してMicrosoft®Visual Basic Editorを開きます。
5. Visual Basicエディタから、メニューツール===>参照を選択します。 ダイアログがポップアップします。 [参照]ボタンをクリックし、 'C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil'フォルダからcruflbcs.dllを選択します。 crUFLBcs 4.0を選択してください。 そしてOKボタンをクリックしてください。
6. Ctrl + Mを押します。 ダイアログがポップアップします。 C：¥Program File¥CommonFiles¥Barcodesoft¥Fontutil フォルダの下のbarcodesoft.basを選択します。 次に「開く」をクリックします。
下記のコードスニペットからコピーすることもできます。
Public Function QRcode(strToEncode As String) As String
Dim obj As cruflBCS.CQRCode
Set obj = New cruflBCS.CQRCode
QRCode = obj.Encode(strToEncode)
Set obj = Nothing
End Function
7. Visual Basicを閉じて、Excelスプレッドシートに戻ります。 次のマクロを使用してデータをエンコードしてください。qrcode。 処理するデータがたくさんある場合は、マクロを列/行全体にコピーするだけで済みます。 すべての QRCodeはすぐに準備ができています。
=qrcode(xx)
8. セルB1を右クリックして、コンテキストメニューからセルの書式設定を選択します。
9. フォントタブをクリックして、フォントとしてBcsqrcodeSを選択します。
10. 配置タブをクリックして、「テキストを折り返す」を選択します。
11. OKをクリックしてください。 ExcelのスプレッドシートにQRCodeと表示されます。 QRCodeの行の間に小さな隙間があるかもしれません。 ただし、bcsqrcodes TrueTypeフォントはこのギャップを最小限に抑えるように設計されているため、 QRCodeを印刷してスキャンしても問題にはなりません。
Crystal Reportsから QRCodeを印刷する
1. オープンクリスタルレポート。式フィールドを右クリックして、コンテキストメニューから[新規作成...]を選択します。
[名前]テキストボックスに「qrcode1」と入力し、[OK]をクリックします。
2. 関数 ==> その他の機能 ==> COM および .NET UFL (u212com.dll)、 "BCSQRCodeEncodeCR"機能を選択します。
3. QRCode式のパラメータとしてデータベースフィールドに入力します。 「保存して閉じる」ボタンをクリックしてください。
式フィールドの最大文字列長は254です。したがって、複数の式フィールドを作成する必要があります。
必要な数式フィールドの数は、次の数式を使用してください。BCSqrcodeFormulaNoForCR({Test.Data})
4. QRCode式フィールドをあなたの水晶の報告書にドラッグしてください。あなたはいくつかの16進数コードを見るでしょう。 心配しないで！ あなたはまだフォントを使っていません。
Local stringVar codestr := "QRCode" + Chrw(13) + chrw(10) + {Test.Data};
BCSQRCodeEncodeCR({Test.Data}, 1, 1, 0, 0)
Local stringVar codestr := "QRCode" + Chrw(13) + chrw(10) + {Test.Data};
BCSQRCodeEncodeCR({Test.Data}, 2, 1, 0, 0)
Local stringVar codestr := "QRCode" + Chrw(13) + chrw(10) + {Test.Data};
BCSQRCodeEncodeCR({Test.Data}, 3, 1, 0, 0)
数式フィールドの最初のパラメーターは、エンコードする文字列です。
数式フィールドの 2 番目のパラメーターはインデックスです。
数式フィールドの 3 番目のパラメーターはエラー修正レベルです。 その値の範囲は 1 ～ 4 で、L07、M15、Q25、および H30 を個別に表します。 デフォルト値 0 に設定すると、M15 エラー訂正レベルを表します。
5. [qrcode]式フィールドを右クリックします。 コンテキストメニューから[フィールドの書式]を選択します。 それからフォントとして "BcsQRCode"を選択してください。
6. OKボタンをクリックしてください。 レポートに QRCodeと表示されます。
7. レポートでGS1 QRCodeを使用するには、BCSQRCodeEncodeCRGS1の式をご使用ください。
BCSQRCodeEncodeCRGS1(str, 1, 0);
BCSQRCodeEncodeCRGS1(str, 2, 0);
BCSQRCodeEncodeCRGS1(str, 3, 0);
最初のパラメータはstrです。データは、cruflbcs.dllがGS1-QRコードとしてエンコードする前に、次の形式である必要があります: (17)190508(90)50921。
各アプリケーション識別子（AI）の前後に必ず括弧を付けてください。必要に応じて、FNC1は自動的に追加されます。
2番目のパラメータは式のインデックスです。
3番目のパラメータはエラー訂正レベルです。