Excel - VBA

Barcode 출력하기 (Code 128, Code 39, 2of5 Interleaved, EAN13, Datamatrix, QR Code)

EGTools 2023. 2. 26. 16:25

다양한 바코드를 생성할 수 있는 별도의 Excel  바코드 발행 추가기능으로 업그레이드 되었습니다.

https://egtools.tistory.com/entry/EGBarcode

 

Excel로 바코드 발행하는 추가기능 EGBarcode (v2.5)

순수한 VBA로 작성된 바코드 발행기입니다. 최종 버전 : V2.5 배포일자 : 2023-03-14 이 함수는 EGTools 추가기능에도 추가되었습니다.(v3.6.0) 발행할 수 있는 바코드 종류는 아래와 같습니다. 1D : Code128, C

egtools.tistory.com

 

EGTools 추가 기능에서도 함수 및 매크로로 지원하고 있습니다.

 

이미 기능이 개선되어 아래 내용은 추천하지 않으니 참고만 하시기 바랍니다.


VBA 코드만으로 바코드를 생성하는 매크로 파일로 출력할 수 있는 바코드는 아래와 같습니다.

1D : Code 128, Code 39, EAN13, 2of5 Interleaved

2D : QR Code, Datamatrix 

 

최초 버전은 2013년에 Google Code에 올라온 자료로 MIT License를 따릅니다.

(단, BarsAndSpaces.ttf는  - GNU GPL)

https://code.google.com/archive/p/barcode-vba-macro-only/

 

GitHub에 올라온 것이 이것 (Steven Lee)

https://github.com/alitrack/barcode-vba-macro-only

barcody.xls
0.50MB

 

이어서 몇가지 치명적인 수정을 한 것이 이것 (JonasHeidelberg)

https://github.com/JonasHeidelberg/barcode-vba-macro-only

QR-code-no-longer-stutters-nor-ends-prematurely-v05-quickfix2-1.xlsm
0.13MB

 

한글같은 유니코드가 제대로 표시되지 않은 것을 수정한 것이 이것 (EGTools)

 

Barcody-QR-code-fixed-for-unicode.xlsm
0.15MB
BarsAndSpaces.ttf
0.00MB

 

두가지 방식으로 사용할 수 있으며,

하나는 바코드를 Shapes를 이용하여 직접 그리는 방식과,

하나는 BarsAndSpaces.ttf 폰트를 사용하여 텍스트처럼 출력하는 방식입니다.

 

이중 Shapes를  이용하여 직접 그리는 방식은 Excel을 상당히 느리게 할 수 있으므로

가능하면 폰트를 이용하여 글자처럼 출력하는 방식을 사용하는 것을 추천드립니다.

 

EncodeBarcode(CELL("SHEET");CELL("ADDRESS");Text ; Type; Output ; Options ; Space)

 

Type : 0-Code128,1-EAN,2-2of5I,3-Code39,50-Datamatrix,51-QR

Output : 그림출력=1, 폰트출력=0

Options : 바코드 type별 Parameters

Spaces : 1D 바코드 앞뒤로 공백을 주는 크기