Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² Π² excel code128
ΠΠ΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² Π² excel code128
Barcode.ttf Π¨ΡΠΈΡΡ TrueType Π΄Π»Ρ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΠ΅ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ².
Barcode.bas ΠΡΡ
ΠΎΠ΄Π½ΡΠ΅ ΡΠ΅ΠΊΡΡΡ ΡΡΠ½ΠΊΡΠΈΠΉ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΡ ΡΠ°Π·Π»ΠΈΡΠ½ΡΠ΅ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²ΠΎΠΊ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ².
Barcode.doc ΠΡΠΈΠΌΠ΅Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΎΠ²ΠΎΠ³ΠΎ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ Π² Microsoft Word.
Barcode.mdb ΠΡΠΈΠΌΠ΅Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΎΠ²ΠΎΠ³ΠΎ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ Π² Microsoft Access.
Barcode.xls ΠΡΠΈΠΌΠ΅Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΎΠ²ΠΎΠ³ΠΎ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ Π² Microsoft Excel.
Descript.doc ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ ΠΏΡΠΈΠ½ΡΠΈΠΏΠΎΠ² ΡΠΎΡΠΌΠΈΡΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ².
Readme.txt ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ ΡΡΡΠ°Π½ΠΎΠ²ΠΊΠΈ ΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ. ΠΡΠΎΡ ΡΠ°ΠΉΠ».
2.1. ΠΠ°Π³ΡΡΠ·ΠΊΠ° ΠΏΠ°ΠΊΠ΅ΡΠ° Π½Π° ΠΊΠΎΠΌΠΏΡΡΡΠ΅Ρ
3.1. ΠΠΎΠ΄Π³ΠΎΡΠΎΠ²ΠΊΠ° Π΄ΠΎΠΊΡΠΌΠ΅Π½ΡΠ° ΠΎΡΠΈΡΠ½ΠΎΠ³ΠΎ ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΡ Π΄Π»Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ²
— ΠΡΠΊΡΠΎΠΉΡΠ΅ ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΠ΅ Micosoft Excel (Word ΠΈΠ»ΠΈ Access). Π‘ΠΎΠ·Π΄Π°ΠΉΡΠ΅ Π½ΠΎΠ²ΡΠΉ ΠΈΠ»ΠΈ ΠΎΡΠΊΡΠΎΠΉΡΠ΅ ΡΡΡΠ΅ΡΡΠ²ΡΡΡΠΈΠΉ Π΄ΠΎΠΊΡΠΌΠ΅Π½Ρ.
— ΠΡΠ±Π΅ΡΠΈΡΠ΅ Π² ΠΌΠ΅Π½Ρ Π‘Π΅ΡΠ²ΠΈΡ ΠΊΠΎΠΌΠ°Π½Π΄Ρ ΠΠ°ΠΊΡΠΎΡ ΠΈ Π Π΅Π΄Π°ΠΊΡΠΎΡ Visual Basic.
— Π ΠΎΠΊΠ½Π΅ ΡΠ΅Π΄Π°ΠΊΡΠΎΡΠ° Visual Basic Π² ΠΌΠ΅Π½Ρ File Π²ΡΠ±Π΅ΡΠΈΡΠ΅ ΠΊΠΎΠΌΠ°Π½Π΄Ρ Import File.
— ΠΠ°ΠΉΠ΄ΠΈΡΠ΅ Π² ΠΏΠ°ΠΏΠΊΠ°Ρ
ΠΈ Π²ΡΠ±Π΅ΡΠΈΡΠ΅ ΡΠ°ΠΉΠ» Barcode.bas, Π²ΠΊΠ»ΡΡΠ΅Π½Π½ΡΠΉ Π² ΡΡΠΎΡ ΠΊΠΎΠΌΠΏΠ»Π΅ΠΊΡ. Π’Π΅ΠΏΠ΅ΡΡ Π² ΡΠΏΠΈΡΠΎΠΊ Modules Π΄ΠΎΠ±Π°Π²ΠΈΡΡΡΡ Π½ΠΎΠ²ΡΠΉ ΠΌΠΎΠ΄ΡΠ»Ρ Barcode.bas.
— ΠΠ°ΠΊΡΠΎΠΉΡΠ΅ ΡΠ΅Π΄Π°ΠΊΡΠΎΡ Visual Basic ΠΈ Π²Π΅ΡΠ½ΠΈΡΠ΅ΡΡ Π² ΠΎΠΊΠ½ΠΎ Microsoft Excel (Word ΠΈΠ»ΠΈ Access).
ΠΠΎΠΊΡΠΌΠ΅Π½Ρ Π³ΠΎΡΠΎΠ² Π΄Π»Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ ΠΎΠ²ΠΎΠ³ΠΎ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ.
Π’Π΅ΠΏΠ΅ΡΡ ΡΠΎΠ΄Π΅ΡΠΆΠΈΠΌΠΎΠ΅ ΡΡΠ΅ΠΉΠΊΠΈ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅Ρ ΡΡΡΠΈΡ ΠΊΠΎΠ΄, Π² ΠΊΠΎΡΠΎΡΠΎΠΌ Π·Π°ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠ° A ΡΡΠ½ΠΊΡΠΈΠΈ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ.
3.2. ΠΡΡΠ°Π²ΠΊΠ° ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ² Π² ΡΠ°ΠΉΠ»Ρ Microsoft Word
— ΠΡΠΏΠΎΠ»Π½ΠΈΡΠ΅ ΠΈΠ½ΡΡΡΡΠΊΡΠΈΡ ΠΏΠΎ ΠΏΠΎΠ΄Π³ΠΎΡΠΎΠ²ΠΊΠ΅ Π΄ΠΎΠΊΡΠΌΠ΅Π½ΡΠ° Π΄Π»Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ², ΠΎΠΏΠΈΡΠ°Π½Π½ΡΡ Π² ΠΏ.3.1.
— ΠΡΡΠ°Π²ΡΡΠ΅ ΡΠ΅ΠΊΡΡΠΎΠ²ΡΠ΅ ΠΏΠΎΠ»Ρ ΡΠΎΡΠΌΡ Π΄ΠΎΠΊΡΠΌΠ΅Π½ΡΠ°, ΠΊΠΎΡΠΎΡΡΠ΅ Π±ΡΠ΄ΡΡ ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΡ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄Ρ.
— Π‘ΠΎΠ·Π΄Π°ΠΉΡΠ΅ ΠΌΠ°ΠΊΡΠΎΡ, Π·Π°ΠΏΠΎΠ»Π½ΡΡΡΠΈΠΉ ΡΡΠΈ ΠΏΠΎΠ»Ρ ΡΠ΅Π·ΡΠ»ΡΡΠ°ΡΠΎΠΌ Π²ΡΠΏΠΎΠ»Π½Π΅Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΉ ΡΡΡΠΈΡ
ΠΎΠ²ΠΎΠ³ΠΎ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ Codabar, Code_128, Code_39 ΠΈΠ»ΠΈ Interleaved_2of5.
ΠΠ°ΠΏΡΠΈΠΌΠ΅Ρ,
ActiveDocument.FormFields(«MyBarcode»).Result = _
Code_128(ActiveDocument.FormFields(«MyData»).Result).
— Π£ΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ ΡΠΎΠ·Π΄Π°Π½Π½ΡΠΉ ΠΌΠ°ΠΊΡΠΎΡ Π½Π° ΠΊΠ½ΠΎΠΏΠΊΡ ΠΈΠ»ΠΈ Π½Π° Π²ΡΡ
ΠΎΠ΄ ΠΈΠ· ΠΏΠΎΠ»Ρ Π΄Π°Π½Π½ΡΡ
ΡΠΎΡΠΌΡ Π΄ΠΎΠΊΡΠΌΠ΅Π½ΡΠ°.
— Π£ΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ Π΄Π»Ρ ΠΏΠΎΠ»Π΅ΠΉ, ΡΠΎΠ΄Π΅ΡΠΆΠ°ΡΠΈΡ
ΡΡΡΠΈΡ
ΠΊΠΎΠ΄, ΡΡΠΈΡΡ Barcode ΡΠ°Π·ΠΌΠ΅ΡΠΎΠΌ ΠΎΡ 16 Π΄ΠΎ 36 ΠΏΡΠ½ΠΊΡΠΎΠ² (ΠΎΠΏΡΠΈΠΌΠ°Π»ΡΠ½ΡΠΉ ΡΠ°Π·ΠΌΠ΅Ρ ΠΏΠΎΠ΄Π±ΠΈΡΠ°Π΅ΡΡΡ Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΎΡ ΠΌΠΎΠ΄Π΅Π»ΠΈ ΡΠΊΠ°Π½Π΅ΡΠ°, ΠΎΠ±ΡΡΠ½ΠΎ 26 ΠΏΡΠ½ΠΊΡΠΎΠ²).
— ΠΠ΅ Π·Π°Π±ΡΠ΄ΡΡΠ΅ ΠΎΡΠΊΠ»ΡΡΠΈΡΡ Π²ΡΠ΄Π΅Π»Π΅Π½ΠΈΠ΅ ΠΏΠΎΠ»Π΅ΠΉ ΡΠ΅ΡΡΠΌ ΡΠΎΠ½ΠΎΠΌ, ΠΈΠ½Π°ΡΠ΅ ΡΡ
ΡΠ΄ΡΠ°Π΅ΡΡΡ ΡΠ°ΡΠΏΠΎΠ·Π½Π°Π²Π°Π½ΠΈΠ΅ ΡΠ΅ΡΠ½ΠΎΠ³ΠΎ Π½Π° ΡΠ΅ΡΠΎΠΌ.
3.3. ΠΡΡΠ°Π²ΠΊΠ° ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ² Π² ΡΠ°ΠΉΠ»Ρ Microsoft Access
— ΠΡΠΏΠΎΠ»Π½ΠΈΡΠ΅ ΠΈΠ½ΡΡΡΡΠΊΡΠΈΡ ΠΏΠΎ ΠΏΠΎΠ΄Π³ΠΎΡΠΎΠ²ΠΊΠ΅ Π΄ΠΎΠΊΡΠΌΠ΅Π½ΡΠ° Π΄Π»Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ
ΠΊΠΎΠ΄ΠΎΠ², ΠΎΠΏΠΈΡΠ°Π½Π½ΡΡ Π² ΠΏ.3.1.
— ΠΠ° Π½ΠΎΠ²ΠΎΠΉ ΡΠΎΡΠΌΠ΅ ΠΈΠ»ΠΈ Π² ΠΎΡΡΠ΅ΡΠ΅ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ ΠΠ°Π΄ΠΏΠΈΡΡ (Label), ΠΎΠΏΡΠ΅Π΄Π΅Π»ΡΠ΅ΠΌΡΡ ΠΊΠ°ΠΊ ΡΠ΅Π·ΡΠ»ΡΡΠ°Ρ Π΄Π΅ΠΉΡΡΠ²ΠΈΡ ΠΎΠ΄Π½ΠΎΠΉ ΠΈΠ· ΡΡΠ½ΠΊΡΠΈΠΉ Codabar, Code_128, Code_39 ΠΈΠ»ΠΈ Interleaved_2of5.
— Π£ΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ Π΄Π»Ρ ΠΠ°Π΄ΠΏΠΈΡΠΈ (Label) ΡΡΠΈΡΡ Barcode ΡΠ°Π·ΠΌΠ΅ΡΠΎΠΌ ΠΎΡ 16 Π΄ΠΎ 36 ΠΏΡΠ½ΠΊΡΠΎΠ² (ΠΎΠΏΡΠΈΠΌΠ°Π»ΡΠ½ΡΠΉ ΡΠ°Π·ΠΌΠ΅Ρ ΠΏΠΎΠ΄Π±ΠΈΡΠ°Π΅ΡΡΡ Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΎΡ ΠΌΠΎΠ΄Π΅Π»ΠΈ ΡΠΊΠ°Π½Π΅ΡΠ°, ΠΎΠ±ΡΡΠ½ΠΎ 26 ΠΏΡΠ½ΠΊΡΠΎΠ²).
ΠΡΠΈΠΌΠ΅ΡΠ°Π½ΠΈΡ
— Π€ΡΠ½ΠΊΡΠΈΠΈ ΡΡΡΠΈΡ
ΠΎΠ²ΠΎΠ³ΠΎ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²Π°Π½ΠΈΡ ΠΌΠΎΠ³ΡΡ Π±ΡΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½Ρ Π½Π΅ΠΏΠΎΡΡΠ΅Π΄ΡΡΠ²Π΅Π½Π½ΠΎ Π² Π·Π°ΠΏΡΠΎΡΠ°Ρ
, Π΄ΠΎ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΡ Π½Π° ΡΠΎΡΠΌΠ΅.
Π€ΡΠ½ΠΊΡΠΈΡ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΡΠ΅Ρ ΡΠΈΡΡΡ ΠΈ ΡΠ»ΡΠΆΠ΅Π±Π½ΡΠ΅ ΡΠΈΠΌΠ²ΠΎΠ»Ρ Π² ΡΡΡΠΈΡ ΠΎΠ²ΠΎΠΉ ΠΊΠΎΠ΄ Codabar, ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅ΠΌΡΠΉ ΠΏΠΎΡΡΠ΅Π΄ΡΡΠ²ΠΎΠΌ ΡΡΠΈΡΡΠ° Barcode.
Π€ΡΠ½ΠΊΡΠΈΡ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΡΠ΅Ρ ΡΠΈΠΌΠ²ΠΎΠ»Ρ Π² ΡΡΡΠΈΡ ΠΎΠ²ΠΎΠΉ ΠΊΠΎΠ΄ Code 128, ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅ΠΌΡΠΉ ΠΏΠΎΡΡΠ΅Π΄ΡΡΠ²ΠΎΠΌ ΡΡΠΈΡΡΠ° Barcode.
Π€ΡΠ½ΠΊΡΠΈΡ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈ ΡΠΎΡΠΌΠΈΡΡΠ΅Ρ ΡΡΠ°ΡΡΠΎΠ²ΡΠΉ ΠΈ ΡΡΠΎΠΏΠΎΠ²ΡΠΉ ΡΠ°Π·ΡΡΠ΄Ρ.
Π€ΡΠ½ΠΊΡΠΈΡ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΡΠ΅Ρ ΠΏΡΠΎΠΏΠΈΡΠ½ΡΠ΅ Π»Π°ΡΠΈΠ½ΡΠΊΠΈΠ΅ Π±ΡΠΊΠ²Ρ, ΡΠΈΡΡΡ ΠΈ ΡΠ»ΡΠΆΠ΅Π±Π½ΡΠ΅ ΡΠΈΠΌΠ²ΠΎΠ»Ρ Π² ΡΡΡΠΈΡ ΠΎΠ²ΠΎΠΉ ΠΊΠΎΠ΄ Code 39, ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅ΠΌΡΠΉ ΠΏΠΎΡΡΠ΅Π΄ΡΡΠ²ΠΎΠΌ ΡΡΠΈΡΡΠ° Barcode.
Π€ΡΠ½ΠΊΡΠΈΡ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈ Π²ΡΡΠ°Π²Π»ΡΠ΅Ρ ΡΠΈΠΌΠ²ΠΎΠ»Ρ * Π΄Π»Ρ ΡΠΎΡΠΌΠΈΡΠΎΠ²Π°Π½ΠΈΡ ΡΡΠ°ΡΡΠΎΠ²ΡΡ ΠΈ ΡΡΠΎΠΏΠΎΠ²ΡΡ ΡΠ°Π·ΡΡΠ΄ΠΎΠ².
4.4. Interleaved_2of5
Π€ΡΠ½ΠΊΡΠΈΡ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΡΠ΅Ρ ΡΠΈΡΡΡ Π² ΡΡΡΠΈΡ
ΠΎΠ²ΠΎΠΉ ΠΊΠΎΠ΄ Interleaved 2 of 5, ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅ΠΌΡΠΉ ΠΏΠΎΡΡΠ΅Π΄ΡΡΠ²ΠΎΠΌ ΡΡΠΈΡΡΠ° Barcode.
Π€ΡΠ½ΠΊΡΠΈΡ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈ ΡΠΎΡΠΌΠΈΡΡΠ΅Ρ ΡΡΠ°ΡΡΠΎΠ²ΡΠΉ ΠΈ ΡΡΠΎΠΏΠΎΠ²ΡΠΉ ΡΠ°Π·ΡΡΠ΄Ρ. ΠΠ΅ΡΠ΅ΡΠ½ΠΎΠ΅ ΡΠΈΡΠ»ΠΎ ΡΠΈΡΡ Ρ ΡΡΠ΅ΡΠΎΠΌ ΠΊΠΎΠ½ΡΡΠΎΠ»ΡΠ½ΠΎΠ³ΠΎ ΡΠ°Π·ΡΡΠ΄Π° Π΄ΠΎΠΏΠΎΠ»Π½ΡΠ΅ΡΡΡ ΡΠ»Π΅Π²Π° ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ «0».
ΠΠ΅ΡΠΏΠ»Π°ΡΠ½ΠΎ Π‘ΠΎΠ·Π΄Π°ΡΡ Π¨ΡΡΠΈΡ ΠΊΠΎΠ΄Ρ ΠΠ½Π»Π°ΠΉΠ½
ΠΠΈΠ½Π΅ΠΉΠ½ΡΠ΅ Π¨ΡΡΠΈΡ ΠΊΠΎΠ΄Ρ, 2D ΠΠΎΠ΄Ρ, GS1 DataBar, ΠΠΎΡΡΠΎΠ²ΡΠ΅ Π¨ΡΡΠΈΡ ΠΊΠΎΠ΄Ρ ΠΈ ΠΌΠ½ΠΎΠ³ΠΈΠ΅ Π΄ΡΡΠ³ΠΈΠ΅!
ΠΡΠΎΡ Π²Π΅Π±-ΡΠ΅ΡΠ²ΠΈΡ Π½Π΅ Ρ ΡΠ°Π½ΠΈΡ Π΄Π°Π½Π½ΡΠ΅ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Ρ. ΠΠ°Π½Π½ΡΠ΅ Π²Ρ ΠΎΠ΄Π° ΠΎΠ±ΡΠ°Π±Π°ΡΡΠ²Π°ΡΡΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΠΏΡΠΎΠ²Π°ΠΉΠ΄Π΅ΡΠΎΠΌ Π²Ρ ΠΎΠ΄Π°. ΠΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΎΠ·Π½Π°ΠΊΠΎΠΌΡΡΠ΅ΡΡ Ρ Π½Π°ΡΠΈΠΌΠΈ ΡΡΠ»ΠΎΠ²ΠΈΡΠΌΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΠΈ ΠΏΠΎΠ»ΠΈΡΠΈΠΊΠΎΠΉ ΠΊΠΎΠ½ΡΠΈΠ΄Π΅Π½ΡΠΈΠ°Π»ΡΠ½ΠΎΡΡΠΈ.
ΠΠ°ΡΠΈ ΠΏΡΠ΅ΠΈΠΌΡΡΠ΅ΡΡΠ²Π°
ΠΠ»Ρ Π·Π°ΡΠ΅Π³ΠΈΡΡΡΠΈΡΠΎΠ²Π°Π½Π½ΡΡ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Π΅ΠΉ Π² Π±Π»ΠΈΠΆΠ°ΠΉΡΠ΅Π΅ Π²ΡΠ΅ΠΌΡ Π±ΡΠ΄ΡΡ Π΄ΠΎΠ±Π°Π²Π»Π΅Π½Ρ Π½ΠΎΠ²ΡΠ΅ ΡΠ°ΡΡΠΈΡΠ΅Π½Π½ΡΠ΅ ΡΡΠ½ΠΊΡΠΈΠΈ.
Π‘ΠΏΠ°ΡΠΈΠ±ΠΎ Π·Π° ΠΠ°Ρ ΠΈΠ½ΡΠ΅ΡΠ΅Ρ! ΠΠ»Ρ ΠΏΠΎΠ»ΡΡΠ΅Π½ΠΈΡ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½ΠΎΠΉ ΠΈΠ½ΡΠΎΡΠΌΠ°ΡΠΈΠΈ, ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΡΠ²ΡΠΆΠΈΡΠ΅ΡΡ Ρ Π½Π°ΠΌΠΈ!
Scan-IT to Office
ΠΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΠ΅ Scan-IT to Office (Π΄Π»Ρ Android, iOS) ΠΎΡΠΏΡΠ°Π²Π»ΡΠ΅Ρ ΡΠ΄Π°Π»Π΅Π½Π½ΠΎ ΡΠΎΠ±ΡΠ°Π½Π½ΡΠ΅ Π΄Π°Π½Π½ΡΠ΅ ΠΈ ΡΡΡΠΈΡ ΠΊΠΎΠ΄Ρ Π² ΡΠ΅Π°Π»ΡΠ½ΠΎΠΌ Π²ΡΠ΅ΠΌΠ΅Π½ΠΈ Π² Excel, Word, Google Π’Π°Π±Π»ΠΈΡΡ, Π±Π°Π·Ρ Π΄Π°Π½Π½ΡΡ ΠΈΠ»ΠΈ Π»ΡΠ±ΡΠ΅ Π΄ΡΡΠ³ΠΈΠ΅ ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΡ Π΄Π»Ρ ΠΠ ΠΈΠ»ΠΈ Mac.
ΠΠ½Π»Π°ΠΉΠ½ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΠΈΠΊΠ΅ΡΠΎΠΊ
Π‘ΠΎΠ·Π΄Π°Π²Π°ΠΉΡΠ΅ ΡΡΠΈΠΊΠ΅ΡΠΊΠΈ ΡΠΎ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠΌ ΠΈ ΠΎΡΡΠ°ΡΠ»Π΅Π²ΡΠ΅ ΡΡΠΈΠΊΠ΅ΡΠΊΠΈ ΠΈ ΡΠΎΡΠΌΡ ΡΡΠΈΠΊΠ΅ΡΠΊΠΈ VDA 4902, AIAG, MAT ΠΈ Ρ.Π΄. ΠΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΡΡ Π΄Π΅ΠΌΠΎ-Π²Π΅ΡΡΠΈΡ ΠΠ½Π»Π°ΠΉΠ½-Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡΠ° ΡΡΠΈΠΊΠ΅ΡΠΎΠΊ ΡΠΎ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠΌ Π΄Π»Ρ ΠΌΠΎΠΌΠ΅Π½ΡΠ°Π»ΡΠ½ΠΎΠΉ ΠΏΠ΅ΡΠ°ΡΠΈ Π½ΡΠΆΠ½ΡΡ ΠΠ°ΠΌ ΡΡΠΈΠΊΠ΅ΡΠΎΠΊ.
ΠΠ½Π»Π°ΠΉΠ½-Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ QR-ΠΊΠΎΠ΄ΠΎΠ²
ΠΡΠΏΠΎΠ»ΡΠ·ΡΠΉΡΠ΅ ΡΠΎΠ·Π΄Π°Π½Π½ΡΠ΅ QR-ΠΊΠΎΠ΄Ρ Π΄Π»Ρ ΠΏΠ΅ΡΠ΅Ρ ΠΎΠ΄Π° Π½Π° Π²Π΅Π±-ΡΡΡΠ°Π½ΠΈΡΡ, Π²Π²ΠΎΠ΄Π° ΡΠ΅Π»Π΅ΡΠΎΠ½Π½ΡΡ Π½ΠΎΠΌΠ΅ΡΠΎΠ², ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠΉ, ΠΎΡΠΏΡΠ°Π²ΠΊΠΈ ΡΠ²ΠΈΡΠΎΠ², ΠΏΠ΅ΡΠ΅Π΄Π°ΡΠΈ ΠΊΠΎΠ½ΡΠ°ΠΊΡΠ½ΡΡ Π΄Π°Π½Π½ΡΡ , ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΡ ΠΊ Wi-Fi ΡΠ΅ΡΡΠΌ ΠΈ Ρ.Π΄. ΠΡΠΎΡΡΠΎ ΠΏΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅!
ΠΠ°Π½Π½ΡΠΉ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² ΡΠ²Π»ΡΠ΅ΡΡΡ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΡΠΌ
ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ Π΄Π°Π½Π½ΡΠΉ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² ΠΊΠ°ΠΊ ΡΠ°ΡΡΡ ΠΠ°ΡΠ΅Π³ΠΎ Π½Π΅ΠΊΠΎΠΌΠΌΠ΅ΡΡΠ΅ΡΠΊΠΎΠ³ΠΎ Π²Π΅Π±-ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΡ ΠΈΠ»ΠΈ Π²Π΅Π±-ΡΠ°ΠΉΡΠ° Π΄Π»Ρ ΡΠΎΠ·Π΄Π°Π½ΠΈΡ Π΄ΠΈΠ½Π°ΠΌΠΈΡΠ΅ΡΠΊΠΈΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² Ρ ΠΠ°ΡΠΈΠΌΠΈ ΡΠΎΠ±ΡΡΠ²Π΅Π½Π½ΡΠΌΠΈ Π΄Π°Π½Π½ΡΠΌΠΈ. Π ΠΎΡΠ²Π΅Ρ ΠΌΡ ΠΏΡΠΎΡΠΈΠΌ ΠΠ°Ρ ΡΠ°Π·ΠΌΠ΅ΡΡΠΈΡΡ Π½Π° ΠΠ°ΡΠ΅ΠΌ ΡΠ°ΠΉΡΠ΅ ΠΎΠ±ΡΠ°ΡΠ½ΡΡ ΡΡΡΠ»ΠΊΡ Ρ ΡΠ΅ΠΊΡΡΠΎΠΌ «ΠΠ΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² ΠΎΡ TEC-IT». ΠΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ Π»ΠΎΠ³ΠΎΡΠΈΠΏΠΎΠ² TEC-IT ΠΎΠΏΡΠΈΠΎΠ½Π°Π»ΡΠ½ΠΎ. ΠΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΡΠ²ΡΠΆΠΈΡΠ΅ΡΡ Ρ Π½Π°ΠΌΠΈ, Π΅ΡΠ»ΠΈ ΠΡ Ρ ΠΎΡΠΈΡΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ Π΄Π°Π½Π½ΡΠΉ ΡΠ΅ΡΠ²ΠΈΡ Π² ΠΊΠΎΠΌΠΌΠ΅ΡΡΠ΅ΡΠΊΠΈΡ ΡΠ΅Π»ΡΡ .
ΠΠ»Ρ ΡΠ°Π·ΠΌΠ΅ΡΠ΅Π½ΠΈΡ ΠΎΠ±ΡΠ°ΡΠ½ΠΎΠΉ ΡΡΡΠ»ΠΊΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠΉΡΠ΅ ΠΏΠΎΠ΄Π³ΠΎΡΠΎΠ²Π»Π΅Π½Π½ΡΠΉ HTML-ΠΊΠΎΠ΄.
ΠΠ΅ΡΠΏΠ»Π°ΡΠ½ΠΎ Π‘ΠΎΠ·Π΄Π°ΡΡ Π¨ΡΡΠΈΡ ΠΊΠΎΠ΄Ρ ΠΠ½Π»Π°ΠΉΠ½
ΠΠΈΠ½Π΅ΠΉΠ½ΡΠ΅ Π¨ΡΡΠΈΡ ΠΊΠΎΠ΄Ρ, 2D ΠΠΎΠ΄Ρ, GS1 DataBar, ΠΠΎΡΡΠΎΠ²ΡΠ΅ Π¨ΡΡΠΈΡ ΠΊΠΎΠ΄Ρ ΠΈ ΠΌΠ½ΠΎΠ³ΠΈΠ΅ Π΄ΡΡΠ³ΠΈΠ΅!
ΠΡΠΎΡ Π²Π΅Π±-ΡΠ΅ΡΠ²ΠΈΡ Π½Π΅ Ρ ΡΠ°Π½ΠΈΡ Π΄Π°Π½Π½ΡΠ΅ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Ρ. ΠΠ°Π½Π½ΡΠ΅ Π²Ρ ΠΎΠ΄Π° ΠΎΠ±ΡΠ°Π±Π°ΡΡΠ²Π°ΡΡΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΠΏΡΠΎΠ²Π°ΠΉΠ΄Π΅ΡΠΎΠΌ Π²Ρ ΠΎΠ΄Π°. ΠΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΠΎΠ·Π½Π°ΠΊΠΎΠΌΡΡΠ΅ΡΡ Ρ Π½Π°ΡΠΈΠΌΠΈ ΡΡΠ»ΠΎΠ²ΠΈΡΠΌΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ ΠΈ ΠΏΠΎΠ»ΠΈΡΠΈΠΊΠΎΠΉ ΠΊΠΎΠ½ΡΠΈΠ΄Π΅Π½ΡΠΈΠ°Π»ΡΠ½ΠΎΡΡΠΈ.
ΠΠ°ΡΠΈ ΠΏΡΠ΅ΠΈΠΌΡΡΠ΅ΡΡΠ²Π°
ΠΠ»Ρ Π·Π°ΡΠ΅Π³ΠΈΡΡΡΠΈΡΠΎΠ²Π°Π½Π½ΡΡ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Π΅ΠΉ Π² Π±Π»ΠΈΠΆΠ°ΠΉΡΠ΅Π΅ Π²ΡΠ΅ΠΌΡ Π±ΡΠ΄ΡΡ Π΄ΠΎΠ±Π°Π²Π»Π΅Π½Ρ Π½ΠΎΠ²ΡΠ΅ ΡΠ°ΡΡΠΈΡΠ΅Π½Π½ΡΠ΅ ΡΡΠ½ΠΊΡΠΈΠΈ.
Π‘ΠΏΠ°ΡΠΈΠ±ΠΎ Π·Π° ΠΠ°Ρ ΠΈΠ½ΡΠ΅ΡΠ΅Ρ! ΠΠ»Ρ ΠΏΠΎΠ»ΡΡΠ΅Π½ΠΈΡ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½ΠΎΠΉ ΠΈΠ½ΡΠΎΡΠΌΠ°ΡΠΈΠΈ, ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΡΠ²ΡΠΆΠΈΡΠ΅ΡΡ Ρ Π½Π°ΠΌΠΈ!
Scan-IT to Office
ΠΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΠ΅ Scan-IT to Office (Π΄Π»Ρ Android, iOS) ΠΎΡΠΏΡΠ°Π²Π»ΡΠ΅Ρ ΡΠ΄Π°Π»Π΅Π½Π½ΠΎ ΡΠΎΠ±ΡΠ°Π½Π½ΡΠ΅ Π΄Π°Π½Π½ΡΠ΅ ΠΈ ΡΡΡΠΈΡ ΠΊΠΎΠ΄Ρ Π² ΡΠ΅Π°Π»ΡΠ½ΠΎΠΌ Π²ΡΠ΅ΠΌΠ΅Π½ΠΈ Π² Excel, Word, Google Π’Π°Π±Π»ΠΈΡΡ, Π±Π°Π·Ρ Π΄Π°Π½Π½ΡΡ ΠΈΠ»ΠΈ Π»ΡΠ±ΡΠ΅ Π΄ΡΡΠ³ΠΈΠ΅ ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΡ Π΄Π»Ρ ΠΠ ΠΈΠ»ΠΈ Mac.
ΠΠ½Π»Π°ΠΉΠ½ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΠΈΠΊΠ΅ΡΠΎΠΊ
Π‘ΠΎΠ·Π΄Π°Π²Π°ΠΉΡΠ΅ ΡΡΠΈΠΊΠ΅ΡΠΊΠΈ ΡΠΎ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠΌ ΠΈ ΠΎΡΡΠ°ΡΠ»Π΅Π²ΡΠ΅ ΡΡΠΈΠΊΠ΅ΡΠΊΠΈ ΠΈ ΡΠΎΡΠΌΡ ΡΡΠΈΠΊΠ΅ΡΠΊΠΈ VDA 4902, AIAG, MAT ΠΈ Ρ.Π΄. ΠΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΡΡ Π΄Π΅ΠΌΠΎ-Π²Π΅ΡΡΠΈΡ ΠΠ½Π»Π°ΠΉΠ½-Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡΠ° ΡΡΠΈΠΊΠ΅ΡΠΎΠΊ ΡΠΎ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠΌ Π΄Π»Ρ ΠΌΠΎΠΌΠ΅Π½ΡΠ°Π»ΡΠ½ΠΎΠΉ ΠΏΠ΅ΡΠ°ΡΠΈ Π½ΡΠΆΠ½ΡΡ ΠΠ°ΠΌ ΡΡΠΈΠΊΠ΅ΡΠΎΠΊ.
ΠΠ½Π»Π°ΠΉΠ½-Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ QR-ΠΊΠΎΠ΄ΠΎΠ²
ΠΡΠΏΠΎΠ»ΡΠ·ΡΠΉΡΠ΅ ΡΠΎΠ·Π΄Π°Π½Π½ΡΠ΅ QR-ΠΊΠΎΠ΄Ρ Π΄Π»Ρ ΠΏΠ΅ΡΠ΅Ρ ΠΎΠ΄Π° Π½Π° Π²Π΅Π±-ΡΡΡΠ°Π½ΠΈΡΡ, Π²Π²ΠΎΠ΄Π° ΡΠ΅Π»Π΅ΡΠΎΠ½Π½ΡΡ Π½ΠΎΠΌΠ΅ΡΠΎΠ², ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠΉ, ΠΎΡΠΏΡΠ°Π²ΠΊΠΈ ΡΠ²ΠΈΡΠΎΠ², ΠΏΠ΅ΡΠ΅Π΄Π°ΡΠΈ ΠΊΠΎΠ½ΡΠ°ΠΊΡΠ½ΡΡ Π΄Π°Π½Π½ΡΡ , ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΡ ΠΊ Wi-Fi ΡΠ΅ΡΡΠΌ ΠΈ Ρ.Π΄. ΠΡΠΎΡΡΠΎ ΠΏΠΎΠΏΡΠΎΠ±ΡΠΉΡΠ΅!
ΠΠ°Π½Π½ΡΠΉ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² ΡΠ²Π»ΡΠ΅ΡΡΡ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΡΠΌ
ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ Π΄Π°Π½Π½ΡΠΉ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² ΠΊΠ°ΠΊ ΡΠ°ΡΡΡ ΠΠ°ΡΠ΅Π³ΠΎ Π½Π΅ΠΊΠΎΠΌΠΌΠ΅ΡΡΠ΅ΡΠΊΠΎΠ³ΠΎ Π²Π΅Π±-ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΡ ΠΈΠ»ΠΈ Π²Π΅Π±-ΡΠ°ΠΉΡΠ° Π΄Π»Ρ ΡΠΎΠ·Π΄Π°Π½ΠΈΡ Π΄ΠΈΠ½Π°ΠΌΠΈΡΠ΅ΡΠΊΠΈΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² Ρ ΠΠ°ΡΠΈΠΌΠΈ ΡΠΎΠ±ΡΡΠ²Π΅Π½Π½ΡΠΌΠΈ Π΄Π°Π½Π½ΡΠΌΠΈ. Π ΠΎΡΠ²Π΅Ρ ΠΌΡ ΠΏΡΠΎΡΠΈΠΌ ΠΠ°Ρ ΡΠ°Π·ΠΌΠ΅ΡΡΠΈΡΡ Π½Π° ΠΠ°ΡΠ΅ΠΌ ΡΠ°ΠΉΡΠ΅ ΠΎΠ±ΡΠ°ΡΠ½ΡΡ ΡΡΡΠ»ΠΊΡ Ρ ΡΠ΅ΠΊΡΡΠΎΠΌ «ΠΠ΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² ΠΎΡ TEC-IT». ΠΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ Π»ΠΎΠ³ΠΎΡΠΈΠΏΠΎΠ² TEC-IT ΠΎΠΏΡΠΈΠΎΠ½Π°Π»ΡΠ½ΠΎ. ΠΠΎΠΆΠ°Π»ΡΠΉΡΡΠ°, ΡΠ²ΡΠΆΠΈΡΠ΅ΡΡ Ρ Π½Π°ΠΌΠΈ, Π΅ΡΠ»ΠΈ ΠΡ Ρ ΠΎΡΠΈΡΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ Π΄Π°Π½Π½ΡΠΉ ΡΠ΅ΡΠ²ΠΈΡ Π² ΠΊΠΎΠΌΠΌΠ΅ΡΡΠ΅ΡΠΊΠΈΡ ΡΠ΅Π»ΡΡ .
ΠΠ»Ρ ΡΠ°Π·ΠΌΠ΅ΡΠ΅Π½ΠΈΡ ΠΎΠ±ΡΠ°ΡΠ½ΠΎΠΉ ΡΡΡΠ»ΠΊΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠΉΡΠ΅ ΠΏΠΎΠ΄Π³ΠΎΡΠΎΠ²Π»Π΅Π½Π½ΡΠΉ HTML-ΠΊΠΎΠ΄.
ΠΠ°ΠΊ ΡΠ°ΠΌΠΎΡΡΠΎΡΡΠ΅Π»ΡΠ½ΠΎ ΡΠ΄Π΅Π»Π°ΡΡ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² Π² Excel
ΠΡΠΈ Π²Π΅Π΄Π΅Π½ΠΈΠΈ ΡΡΠ΅ΡΠ° Π² ΡΠΎΡΠ³ΠΎΠ²Π»Π΅, ΡΠΎΠ·Π΄Π°Π½ΠΈΠΈ Π»ΠΈΡΠ½ΡΡ ΠΊΠ°ΡΠ°Π»ΠΎΠ³ΠΎΠ² ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΡΡΡΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄Ρ. ΠΠ»Ρ ΠΈΡ ΠΏΠΎΡΠ»Π΅Π΄ΡΡΡΠ΅Π³ΠΎ ΡΡΠΈΡΡΠ²Π°Π½ΠΈΡ ΡΡΡΠ΅ΡΡΠ²ΡΡΡ ΡΠΊΠ°Π½Π΅ΡΡ. Π ΡΠΎΠ·Π΄Π°ΡΡ ΠΌΠΎΠΆΠ½ΠΎ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ½ΡΡ ΠΏΡΠΎΠ΄ΡΠΊΡΠΎΠ² ΡΠ°Π·ΡΠ°Π±ΠΎΡΠ°Π½Π½ΡΡ ΡΠΏΠ΅ΡΠΈΠ°Π»ΡΠ½ΠΎ Π΄Π»Ρ Excel.
ΠΠ°ΠΊ ΡΠ΄Π΅Π»Π°ΡΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ Π² Excel
Π‘ΡΠΎΡΠΌΠΈΡΠΎΠ²Π°ΡΡ Π³Π΅Π½Π΅ΡΠ°ΡΠΎΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² Π² Excel ΠΌΠΎΠΆΠ½ΠΎ ΡΠ°Π·Π½ΡΠΌΠΈ ΡΠΏΠΎΡΠΎΠ±Π°ΠΌΠΈ: Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΠΌΠ°ΠΊΡΠΎΡΠ°, ΠΈΠ½ΡΡΡΡΠΌΠ΅Π½ΡΠ° ActiveX ΠΈ ΡΠ°Π·ΡΠ°Π±ΠΎΡΠ°Π½Π½ΡΡ ΠΌΠΎΠ΄ΡΠ»Π΅ΠΉ. Π Π°ΡΡΠΌΠΎΡΡΠΈΠΌ Π½Π° ΠΏΡΠΈΠΌΠ΅ΡΠ΅ ΠΎΠ΄Π½ΠΎΠ³ΠΎ ΠΈΠ· ΡΠΏΠ΅ΡΠΈΠ°Π»ΠΈΠ·ΠΈΡΠΎΠ²Π°Π½Π½ΡΡ ΠΏΡΠΎΠ΄ΡΠΊΡΠΎΠ². ΠΠ½ ΡΠ²Π»ΡΠ΅ΡΡΡ Π°Π±ΡΠΎΠ»ΡΡΠ½ΠΎ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΡΠΌ. ΠΠΎΡΡΠΎΠΌΡ ΡΠ°ΡΡΠ΅Π½ΠΈΠ²Π°ΡΡ ΡΡΠ°ΡΡΡ ΠΊΠ°ΠΊ ΡΠ΅ΠΊΠ»Π°ΠΌΠ½ΡΡ Π½Π΅Π»ΡΠ·Ρ.
Π‘Π°ΠΌΡΠΉ ΠΏΡΠΎΡΡΠΎΠΉ ΡΠΏΠΎΡΠΎΠ± ΡΡΠΎ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΡ Π² Windows ΡΡΠΈΡΡΡ ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² ΠΈ ΡΠΎΠ³Π΄Π° ΠΎΠ½ΠΈ Π±ΡΠ΄Ρ Π΄ΠΎΡΡΡΠΏΠ½Ρ Π² Excel Π½Π° ΠΏΠ°Π½Π΅Π»ΠΈ «ΠΠ»Π°Π²Π½Π°Ρ»-«Π¨ΡΠΈΡΡ».
ΠΠ°ΡΡ ΡΡΠΈΡΡΠΎΠ²-ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² ΠΌΠΎΠΆΠ½ΠΎ ΡΠΊΠ°ΡΠ°ΡΡ Π² ΠΊΠΎΠ½ΡΠ΅ ΡΡΠ°ΡΡΠΈ
Π’Π°ΠΊ ΠΆΠ΅ ΠΌΠΎΠΆΠ½ΠΎ ΡΠΊΠ°ΡΠ°ΡΡ ΠΏΠΎ Π°Π΄ΡΠ΅ΡΡ http://www.idautomation.com/font-encoders/word-excel-addin/ Π½Π°Π΄ΡΡΡΠΎΠΉΠΊΡ Π΄Π»Ρ Π²Π²ΠΎΠ΄Π° ΡΡΡΠΈΡ ΠΊΠΎΠ΄ΠΎΠ² Π² ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ΅ Excel ΠΈΠ»ΠΈ Word.
ΠΠ΅ΡΠ΅Π΄ Π½Π°ΡΠ°Π»ΠΎΠΌ ΡΠ°Π±ΠΎΡΡ ΡΠ±Π΅Π΄ΠΈΡΠ΅ΡΡ, ΡΡΠΎ Π² ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ΅ Excel Π΄ΠΎΡΡΡΠΏΠ΅Π½ Visual Basic. Π Π² Π½Π°ΡΡΡΠΎΠΉΠΊΠ°Ρ Π±Π΅Π·ΠΎΠΏΠ°ΡΠ½ΠΎΡΡΠΈ β ΡΠ½ΡΡΡ ΠΎΠ³ΡΠ°Π½ΠΈΡΠ΅Π½ΠΈΡ Π΄Π»Ρ ΠΌΠ°ΠΊΡΠΎΡΠΎΠ².
Π‘Π»Π΅Π΄ΡΡΡΠΈΠΉ ΡΡΠ°ΠΏ β ΠΏΠ΅ΡΠ°ΡΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄Π° ΠΈΠ· Excel Π΄Π»Ρ ΠΏΡΠΎΠ²Π΅ΡΠΊΠΈ ΠΏΡΠ°Π²ΠΈΠ»ΡΠ½ΠΎΡΡΠΈ ΠΊΠΎΠ΄ΠΈΡΠΎΠ²ΠΊΠΈ. Π’ΠΎ Π΅ΡΡΡ Π½Π°ΠΏΠ΅ΡΠ°ΡΠ°ΡΡ ΠΊΠΎΠ΄Ρ ΠΌΠΎΠΆΠ½ΠΎ ΡΠΎΠ»ΡΠΊΠΎ ΡΠΎΠ³Π΄Π°, ΠΊΠΎΠ³Π΄Π° ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΡΡΡΡ ΡΠΏΠ΅ΡΠΈΠ°Π»ΡΠ½ΡΠ΅ ΡΡΠΈΡΡΡ.
ΠΡΠ΅ ΠΎΠ΄ΠΈΠ½ ΡΠΏΠΎΡΠΎΠ± ΡΠΎΡΠΌΠΈΡΠΎΠ²Π°Π½ΠΈΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ΠΎΠ² β Π½Π°ΠΏΠΈΡΠ°ΡΡ ΠΌΠ°ΠΊΡΠΎΡ (ΡΠ΅Π°Π»ΠΈΠ·ΠΎΠ²Π°Π½ΠΎ ΡΡΡ).
Π§ΡΠΎΠ±Ρ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ Π² Excel 2007, Π½ΡΠΆΠ½ΠΎ Π²ΡΠΏΠΎΠ»Π½ΠΈΡΡ ΡΠ»Π΅Π΄ΡΡΡΡΡ ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°ΡΠ΅Π»ΡΠ½ΠΎΡΡΡ:
Π§ΡΠΎΠ±Ρ Π½Π°ΡΠΈΡΠΎΠ²Π°Π½Π½ΡΠΉ ΠΊΠΎΠ΄ Β«Π·Π°ΡΠ°Π±ΠΎΡΠ°Π»Β» (Π°Π΄Π°ΠΏΡΠΈΡΠΎΠ²Π°Π»ΡΡ ΠΏΠΎΠ΄ Π²Π²Π΅Π΄Π΅Π½Π½ΡΠ΅ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Π΅ΠΌ ΡΠΈΡΡΡ), Π½ΡΠΆΠ½ΠΎ ΠΏΠΈΡΠ°ΡΡ ΠΌΠ°ΠΊΡΠΎΡ.
ΠΠ°ΠΊ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠΈΡΡ ΡΠΊΠ°Π½Π΅Ρ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄Π° ΠΊ Excel
ΠΡΠΎΡΠ΅ΡΡ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½ΠΈΡ Π·Π°Π²ΠΈΡΠΈΡ ΠΎΡ ΠΌΠΎΠ΄Π΅Π»ΠΈ ΡΠΊΠ°Π½Π΅ΡΠ° ΠΈ Π΅Π³ΠΎ Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎΡΡΠ΅ΠΉ. ΠΠ½ΠΎΠ³Π΄Π° Π½ΠΈΡΠ΅Π³ΠΎ Π΄Π΅Π»Π°ΡΡ Π½Π΅ Π½ΡΠΆΠ½ΠΎ. ΠΠΎΡΡΠ°ΡΠΎΡΠ½ΠΎ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠΈΡΡ ΡΠΊΠ°Π½Π΅Ρ ΠΊ ΠΊΠΎΠΌΠΏΡΡΡΠ΅ΡΡ, ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΡ Π²ΠΊΠ»ΡΡΠ΅Π½ΠΈΠ΅ Β«ΡΠ°Π·ΡΠ΅ΠΌ ΠΊΠ»Π°Π²ΠΈΠ°ΡΡΡΡΒ», ΠΈ ΠΎΡΠΊΡΡΡΡ Π²ΠΎ Π²ΡΠ΅ΠΌΡ ΡΠ°Π±ΠΎΡΡ ΠΊΠ½ΠΈΠ³Ρ Excel (Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±ΡΡΡ ΡΡΡΠ°Π½ΠΎΠ²Π»Π΅Π½ USB-Π΄ΡΠ°ΠΉΠ²Π΅Ρ ΡΠΊΠ°Π½Π΅ΡΠ°).
Π‘ΠΊΠ°Π½Π΅Ρ Π½Π΅ Π²ΠΎΡΠΏΡΠΈΠ½ΠΈΠΌΠ°Π΅Ρ ΡΡΡΠΈΡ -ΠΊΠΎΠ΄ ΠΊΠ°ΠΊ Π³ΡΠ°ΡΠΈΡΠ΅ΡΠΊΠΈΠΉ ΠΎΠ±ΡΠ΅ΠΊΡ β ΠΎΠ½ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΡΠ΅Ρ Π΅Π³ΠΎ Π² Π½Π°Π±ΠΎΡ ΡΠΈΡΡ. ΠΠΎ Π²ΡΠ΅ΠΌΡ ΡΠ°Π±ΠΎΡΡ Π² Π°ΠΊΡΠΈΠ²Π½ΡΡ ΡΡΠ΅ΠΉΠΊΡ Π²ΡΡΠ°Π²Π»ΡΠ΅ΡΡΡ ΡΠΈΡΠ»ΠΎΠ²ΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅, ΡΡΠΈΡΡΠ²Π°Π΅ΠΌΠΎΠ΅ ΡΡΡΡΠΎΠΉΡΡΠ²ΠΎΠΌ, ΠΈ ΡΡΠ°Π±Π°ΡΡΠ²Π°Π΅Ρ ΠΏΠ΅ΡΠ΅Π²ΠΎΠ΄ ΡΡΡΠΎΠΊΠΈ. ΠΠ΅ΡΠ΅ΠΊΡΠΎΡ ΠΏΠΎΡΡΠ»Π°Π΅Ρ ΡΠΈΠΌΠ²ΠΎΠ» Enter, ΡΡΠΎ Π·Π°ΡΡΠ°Π²Π»ΡΠ΅Ρ ΠΊΡΡΡΠΎΡ ΠΏΠ΅ΡΠ΅ΠΉΡΠΈ Π² ΡΠ»Π΅Π΄ΡΡΡΡΡ ΡΡΡΠΎΠΊΡ.
Π ΡΠ΄ ΠΌΠΎΠ΄Π΅Π»Π΅ΠΉ ΡΠΊΠ°Π½Π΅ΡΠΎΠ² ΡΠ°Π±ΠΎΡΠ°Π΅Ρ ΠΊΠ°ΠΊ ΠΊΠ»Π°Π²ΠΈΠ°ΡΡΡΠ°. ΠΡΠΈ Π²Π²ΠΎΠ΄Π΅ ΠΊΠΎΠ΄Π° Π΄Π°Π½Π½ΡΠ΅ ΡΡΠ°Π·Ρ ΠΏΠΎΠΏΠ°Π΄Π°ΡΡ Π² Π°ΠΊΡΠΈΠ²Π½ΡΡ ΡΡΠ΅ΠΉΠΊΡ Π»ΠΈΡΡΠ°.
ΠΠ»Ρ ΡΡΠ΄Π° ΡΡΡΡΠΎΠΉΡΡΠ² ΡΡΠ΅Π±ΡΠ΅ΡΡΡ ΡΠΏΠ΅ΡΠΈΠ°Π»ΡΠ½Π°Ρ Π½Π°Π΄ΡΡΡΠΎΠΉΠΊΠ°: ΡΡΠ°Π½Π΄Π°ΡΡΠ½ΠΎΠ΅ ΠΌΠ΅Π½Ρ Π½Π΅ ΡΠΏΡΠ°Π²ΠΈΡΡΡ Ρ Π·Π°Π΄Π°ΡΠ΅ΠΉ.
Easily generate Code 128 barcodes in Excel
This simple methodology can be employed to reliably generate Code 128 barcodes in Excel.
There are many methodologies published online for generating Code 128 barcodes in Excel. Unfortunately, most of them are complicated or donβt work in the later versions of Excel that most people use today.
A Code 128 barcode has six sections:
The check character is calculated from a weighted sum (modulo 103) of all the characters. Because of this, the generation of Code 128 barcodes is not as simple as typing the number sequence into a programme using a barcode font. Attempting to do this with Code 128 barcodes will fail.
Because I recently had reason to generate Code 128 barcodes, I felt it would be valuable to publish my methodology, which relies on the work of several other people. Follow these steps in order to create your own Code 128 barcode generator in Excel:
Step 1
Step 2
Ensure that you have the Developer module enabled in Excel. If not, follow these instructions.
Step 3
Create a new Microsoft Excel sheet. Create a table (making sure that you βformat as tableβ) with the following structure and headings:
Barcode | Barcode String | Barcode Presentation | Check |
---|---|---|---|
X | X | X | X |
Step 4
In Excel, go to the Developer ribbon and choose βVisual Basicβ.
Step 5
Right-click on βModulesβ in the tree on the left and select βInsert Moduleβ. Then paste the following code, which was written by Philip Treacy:
Step 6
Go back to your Excel sheet and insert the following formulae:
The formulae should copy down the entire columns. Save your sheet.
Step 7
Highlight Column C and change the font to βCode 128β. Now when you enter data into cell A2, a barcode should be displayed in cell C2 and so-on down the entire sheet.
If this doesnβt work, you may need to close and re-open Excel at this stage.
Some notes about usage
Unfortunately this script is not perfect and sometimes an a-circumflex (Γ) character will be displayed in the middle of the barcode, particularly if copying numbers from other sources.
The formula in Column D is designed to display βErrorβ if this occurs so as to alert the operator. I added conditional formatting via the following rule: =$D:$D<>«» so that errors will be displayed:
Often the number can simply be copied and pasted back into the same cell, or re-typed. This doesnβt happen often.
A practical application
Whilst itβs nice to be able to generate Code 128 barcodes in Excel, this isnβt entirely useful on a practical level.
After generating the barcode strings (for example βΓKLΓ3.323LΓβ), these sequences can be copied and pasted into Word and the Code 128 font applied to them in order to generate a barcode. Unfortunately people need a human-readable number string beside a barcode, which means copying both the barcode string and the number sequence used to generate it. This is laborious and prone to error.
To get around this problem, I use a mail merge in Microsoft Word, combined with a sticker template to generate labels that contain both the barcode string (which is displayed in the Code 128 font) and the original number (which can be displayed in Arial, Times New Roman etc).
Mail merge can be tricky (a good subject for another post), but once mastered can make barcode generation very easy indeed. The other advantage with mail merge is that the barcode can be combined with other useful information on the label stickers in a manner which is efficient and unlikely to generate error.
Once the barcodes are generated in Word, they can easily be printed and affixed to whatever theyβre designed to label.
Comments
69 responses to βEasily generate Code 128 barcodes in Excelβ
Just wanted to say Thank You!
Thank you so much.
It is wonderful!
You just saved my life! Thanks man!
Does this work when trying to pass special characters like a horizontal tab. Iβve researched that a horizontal tab can be produced in code 128 using ^9 or possibly ^09. I would like a barcode for βStringβ + Horizontal Tab + βStringβ. Thanks in advance for your help.
Did you ever figure this out? Iβm struggling too.
Any luck in finding how to generate Tab inside string?
Hi, I tried to follow this instruction but one error popped up when I entered the formula for C2. Excel said βthe name that you entered is not valid. Reason for this can include: β the name does not begin with a letter or an underscore; β The name containes a space or other invalid characters; β the name conflicts with an Excel built β in name or the name of another object in the workbook.
Also, the Barcode String content looks weird with some characters being replaced by β?β.
Works great, wonderful work. I made sure to cite this source. Thank you.
Great website!
This function works very well with almost everything that I tested.
But itΒ΄s not generating a readable bar code 128 for some sequences like this one:
35160756642960000452590000879700000291361960
Can you try it?
Tks
Did not work. I followed the directions and generated a barcode but it would not scan. Thanks for the help anyway.
Your printed bar code may have been too small or alternatively the code was too close to the edge of the label. There are minimum clearance zones and font sizes that are required for the bar codes to work. I have also encountered this when itβs been printed too small.
Agreed. Seemed great but QR reader would not read the barcode generated
Great work here Philip! Thank you for the help. I am having trouble. There is a large space in the middle of my barcode when using the sequential values FP10001, FP10002, FP10003, etc. These are employee numbers so I have some control over them. So, I tried 10001FP, 10002FP, 10003FP, etc. and the problem is not as bad but many of the barcodes have a large blank in them.
I am feeling simple after reading everyones positive results.
I have Excel 2016.
I tried to do the steps as indicated.
In fields b2, c2, d2 I copied the formulas as directed and tje formulaβs is now what is now displayed in b2, c2, d2. I did change the font for column C and it is displaying the formula as a barcode.
No matter what number I put in b2 the barcode in c2 seems to represent the formula (=[@[Barcode String]]) as a bar code.
Can someone help me with what I have missed. Thanks.
Following is an example of what I see in excel
Barcode Barcode String Barcode Presentation Check
12345 =Code128([@Barcode]) =[@[Barcode String]] =IF(ISNUMBER(SEARCH(βΓβ,[@[Barcode Presentation]],1)),βError!β,ββ)
It sounds like your cells may be formatted as text. Ensure that your cells are formatted as a number then try re-entering the formulae again. It should then work.
I had the same issue with the formulas looking as you typed here. The fix for me was adding a space after the β=β for each formula in B2, C2 and D2.
Hope that helps anyone trying to make this work!
Thanks Adam for the tutorial and Philip for the code.
I try this code in vb6 & barcode printing properly
but not scanning by barcode scanner.
Wowβ¦works like a charm!!
no need to use it only on tables. just use like a normal formula in Excel.
Change font to Code 128.
My one did not work intially as I used a code 128 font from someone elses website. Just use the font as ginve by the developer in links above.
I am kind of stuck. I tried to install the font Code 128. And tried to insert the entire code in to the Visual basic by inserting the module. Without formatting as table, tried to add a ABC123 in A2 and in c2 I tried giving =Code128([@Barcode]) and also =Code128(A2)
But both returns error. I changed the formated the A2 as Number still no change. Can anyone plese elp me with this
i am using excel 2017, would it be okay?
Thanks for the tip.
I managed to build a sheet using this and combining it with mailmerge in word, for a laboratory application.
How about publishing the your example Word mailmerge doc as well?
One thing to check is that the paragraph character at the end of a line is not included. Itβs best to change the font to any characters adjacent to the barcode mailmerge field to a normal text font. Otherwise, confounding characters will appear after the barcode in Word.
Yes, you are correct. I have noticed the same think. I have been contemplating writing about the Word part of this process but Iβve not yet found the time.
Thanks for this article, it was very useful for me. But I have problem: for example the βFA0175 12β Barcode value appears as βΔFA-0175 12wΓβ in the Barcode String cell. Or β3000-ARIA-60β get βΓ> Δ-ARIA-60[Γβ. The Δ or Δ or similar special characters appear in all my Barcode always.
Could you help to find the solution for this error?
Hi Adam,
thanks for publishing and sharing this approach.
Followed and works great.
Hope someone can throw some light to my problem.
if the the input is a special character like β-β, the
VB throws out as β-β (no coding )
but the Code128 interprets as β/β.
Any suggestion? Many thanks.
Receiving an error
The Syntax of this name isnβt correct.
Verify that the name:
-Starts with a letter or underscore
-Doesnβt include a space or character that isnβt allowed
-Doesnβt conflict with an existing name in the workbook
I would like to barcode a series of skuβs similar to this one: 1-73Ghz_E6510_QC
Barcode Barcode String Barcode Presentation Check
1-73Ghz_E6510_QC =Code128([@Barcode]) =[@[Barcode String]] =IF(ISNUMBER(SEARCH(βΓβ,[@[Barcode Presentation]],1)),βError!β,ββ)
The worksheet name is unrelated to anything in the formulas
Incredible solution⦠simple, perfect.
Having trouble getting bar codes to scan. Everything looks good in the spreadsheet. When I print various sized code 128 fonts it wonβt scan. Iβve used various apps to capture the barcode. Nothing. Any other suggestions for a code that seems valid but just wonβt scan? Thanks!
having the same issueβ¦. barcode is generated, but none of my 2 scanners is able to read itβ¦.
My guess is that you may not have enough whitespace (border) around each code. Try spacing things out a bit and see how you go.
Hey just want to say thank you for the steps, now I wish I was proficient in excel to actually get this right, I have played but seems my knowledge of excel and the functions are not what I thought they were
thanks again anyway will try get someone to do this for me
Can I input carriage return in Code for Microsoft Access? And How?
Using Office 2016 and was getting βThe syntax of this name isnβt correctβ error. Used AHSANUL HAQβs trick and was able to get it to work.
By simply putting =Code128(Cell Reference). Worked like a charm. Thank you all for the help and this amazingly simple approach.
Just to say thank you very much!
Very simple and understandable explanation.
It works perfectly!
THANK YOU!
Very helpful.
After I copy and past Module 2 and go back to the sheet to input the formulas, I get an error, βAmbiguous name detected: Code128β and the sheet does not work. Any suggestions?
Disregard, figured it out. I had another module installed that was conflicting with this one. When I removed it and only had the above code in place it works.
It is a fantastic work, helped me to. Thank you.
THANK YOU! This worked exactly as it was written and worked the way I needed to.
I have Excel 2016 and just got a new computer for work (the permissions scheme is different as our company changed ownership). I was running this code great on my old computer but for some reason itβs not working correctly on current machine.
First, per of I had to change the formula in colum B from: β=Code128([@Barcode])β to β=Code128(A2)β & the code in column C from: β=[@[Barcode String]]β to: β=B2β to avoid getting a formula syntax error that Excel would not let me over-ride.
But now the barcode in column C is not generating the proper string. I think itβs the leading character βΓβ. Sure enough, when I put this character in it is not generating the correct barcode for that individual character in the font (other characters seem fine though). Iβve reinstalled the font 3 times so Iβm not sure why it would be mapping the incorrect barcode-βfontβ character. Of course, this manifests as being un-scannable by my scanners.
Any idea why it would be doing this? Is my change in syntax above to blame? Is there something wrong with my permissions/macros that would keep me from being able to run this VBA code?
Actually, it does appear to have been my font: must have been corrupted causing the incorrect mapping.
It appears my changes to the code do not affect the operation of this tool.
Excellent job! Thank you!
If youβre a VB noob like me, make sure you donβt have a name conflict. Donβt name the module Code128 since the sub procedure is already named Code128. You will end up with a #NAME? error as it is looking at the module first before the procedures within it.
This is really great. Having a strange problem, though β the values Iβm encoding are a mix of uppercase letters and numbers, sometimes with a dash. My sample set worked great. In my βreal dataβ, though, the barcode is ending up encoding the text as lower-case, which results in my item not being found after scanned.
Ex: sample data: βDF002-D1β encodes correctly, scan finds the associated item. In the βreal dataβ, this value ends up encoding as βdf002-d1β resulting a not found error after scan.
I have a development background, and work with Excel a lot. This really saved me a lot of time and was very educational, but I cannot figure out why this value is ending up with lowercase is happening.
Any hints or tips or path to go down would be greatly appreciated.
Worked like a charm
Hi there, after struggling for a while I came up with this formula to generate the string. Perhaps is helpfull to someone.
Just paste the forumula in cell B1 (and asing a bar code true type font to it). Then write in cell A1 what you need to code.
Markos it works almost perfectly. Thanks a lot!
I had only one problem.
I am working with character combinations and in 90% of the cases it works correctly.
For example these are ok:
T00B0B4
T00B04F
T00AF4E
T00AF5D
T00B05C
T00B0C7
T00AF5B
T00B054
Here the function puts some special characters and those are not compatible with the font type.
Do you have any suggestions? Anybody?
If you are still looking for the answer to this, I have just come across this site looking to do the same mself and have managed to tweak Marcosβ code slightly to hopefully fix the issue:
This will hopefully resolve your issues with the check digit on certain codes. Also as per the comment by PERRY HOOGE, I think you may need a slightly different font download as the one in the link seems to be slightly corrupt. I used libre_barcode_128 and it worked a treat.
Itβs works! Thanks you!
Thanks for helping me out with this. This was an efficient solution and I appreciate your coding expertise.
I really appreciate you sharing this work; it really saved me a lot of time!
This was incredibly helpful! Works like a charm! Careful, the web has a Code128 font that is corrupted. Found another copy that worked.
I do have a question though. Has anyone ever tried to get this working in MS Access? Iβm not a great VBA coder so if anyone has this working in MS Access, please let the world know.
It works great β but it is important to use a correct code128 font β first I tried it with another one I had found β that didnβt scan. Combined with the LoMag Barcode scanner on my Android phone β itβs really great. The scannings are automatically saved in a file and the file can be uploaded to your cloud-service. Like another user I couldnβt make the original formulas work β but I just refererred to the cell names A2, B2, C2 etc. instead β just using the Code128 function to generate the string of (weird) characters. Thanks!
It work really well, but I have one issue: How can I encode a CR character?
Thank you very much. Itβs very useful.
Does this work on MS Access? Would love the same guide but for MS access π
Thank you for posting this code. It worked really good. Has anyone found a solution for the Γ error everything you had two zeros together? For example MC40100X144. Tried typing them instead of pasting, cell changed to =Code128(A2) etc but anything with a 00 somewhere in the middle generates that error.
Thank you in advance.
Everything worked great except the barcodes wonβt scan. Tried different sizes, made sure there was a enough white space. Still wonβt scan. Any one have any ideas?
Thank you for your work!
Unfortunately, the barcode is unreadable to me. First, I had to understand the difference between a generated barcode and a readable barcode. I found that the start and stop characters are different, my barcode uses code B instead of code A. Something about the check character is also different for something. On Wikipedia, I found the right characters as well as the calculation method.
After that I fixed the VBA code which now only uses Code B.
The next is to see if it helps anyone else.
Option Explicit
Public Function Code128(SourceString As String)
βWritten by Philip Treacy, Feb 2014
βhttp://www.myonlinetraininghub.com/create-barcodes-with-excel-vba
βThis code is not guaranteed to be error free. No warranty is implied or expressed. Use at your own risk and carry out your own testing
βThis function is governed by the GNU Lesser General Public License (GNU LGPL) Ver 3
βInput Parameters : A string
βReturn : 1. An encoded string which produces a bar code when dispayed using the CODE128.TTF font
β 2. An empty string if the input parameter contains invalid characters
Dim Counter As Integer
Dim CheckSum As Long
Dim mini As Integer
Dim dummy As Integer
Dim UseTableB As Boolean
Dim Code128_Barcode As String
If Len(SourceString) > 0 Then
βCheck for valid characters
For Counter = 1 To Len(SourceString)
Select Case Asc(Mid(SourceString, Counter, 1))
Case 32 To 126, 203
Case Else
MsgBox βInvalid character in barcode string.β & vbCrLf & vbCrLf & βPlease only use standard ASCII charactersβ, vbCritical
Code128 = ββ
Exit Function
End Select
Next
βCreate CODE_128B barcode
For Counter = 1 To Len(SourceString)
dummy% = Asc(Mid(SourceString, Counter, 1))
dummy% = IIf(dummy% http://generator.onbarcode.com/linear.aspx?TYPE=8&DATA=1234567&UOM=0&X=1&Y=60&LEFT-MARGIN=0&RIGHT-MARGIN=0&TOP-MARGIN=0&BOTTOM-MARGIN=0&RESOLUTION=72&ROTATE=0&BARCODE-WIDTH=0&BARCODE-HEIGHT=0&SHOW-TEXT=true&TEXT-FONT=Arial%7c9%7cRegular&TextMargin=6&FORMAT=gif&PROCESS-TILDE=false
paste it in cell A2 and change it to an image formula with the reference to A1 (after the text: DATA)
Write your text or number or combination in A1.