Excel
스프레드시트의 바코드 개체

 Standard 이상

Excel 시트에 바코드 삽입 및 자동화하기

Excel 365, 2024, 2021, 2019, 2016, 2013, 2010
다음은 Excel 문서에 바코드를 추가하고 이를 셀의 콘텐츠와 연결하는 방법에 대한 간단한 설명입니다.

먼저 Excel을 실행하고 문서를 만들거나 엽니다.

개발자 탭이 표시되도록 Excel을 구성했는지 확인합니다. 이렇게 하려면 파일 탭을 클릭하여 Excel 옵션으로 이동합니다. 그러면 백스테이지 보기로 전환됩니다. 그런 다음 왼쪽의 탭 그룹에서 옵션을 클릭합니다.ActiveBarcode: Barcode, Excel


1


리본 사용자 지정에서 메인 탭의 개발자 옵션을 활성화한 후 옵션 창을 닫습니다.ActiveBarcode: Barcode, Excel


2


이제 ActiveBarcode 컨트롤 요소를 문서에 삽입할 수 있습니다. 개발자 탭을 선택합니다. ActiveX 컨트롤 범위에서 삽입 버튼을 클릭한 다음 더 많은 컨트롤을 선택합니다.ActiveBarcode: Barcode, Excel


3


화면에 대화 상자가 나타납니다:ActiveBarcode: Barcode, Excel


4


활성 바코드를 선택하고 확인을 클릭합니다. 이제 문서 안에 바코드가 생성됩니다. 표준 EAN-128 바코드입니다. 이것이 기본 유형입니다. ActiveBarcode에서 지원하는 모든 바코드 유형으로 변경할 수 있습니다: QR Code, GS1/EAN-128, Data Matrix, GTIN/EAN-13, Code 39, Code 93, GS1-Data Matrix, Code 128, PDF417, DUN-14, EAN-8, EAN-14, EAN-18, ISBN, ITF-14, NVE, PZN8, SCC-14, SSCC-18 ...이제 이 바코드를 수정할 수 있습니다. 유형, 텍스트, 색상 등을 변경할 수 있습니다. 변경하려면 바코드 내부를 마우스 오른쪽 버튼으로 클릭합니다. 팝업 메뉴가 열립니다: ActiveBarcode: Barcode, Excel


5


ActiveBarcode 개체를 선택한 다음 프로퍼티를 선택합니다. ActiveBarcode 속성 대화상자가 열립니다. 여기에서 원하는 대로 바코드를 수정할 수 있습니다.

또는 Excel의 속성 대화 상자를 사용할 수도 있습니다. 이렇게 하려면 컨트롤 범위에서 프로퍼티 버튼을 클릭합니다:ActiveBarcode: Barcode, Excel


6


셀과 바코드 사이에 링크 만들기: 위에서 설명한 대로 Excel 속성 대화 상자를 엽니다. 바코드 개체를 한 번 클릭하여 활성화합니다. 이제 바코드 개체의 속성이 속성 대화 상자에 표시됩니다. LinkedCell이라는 속성을 찾습니다. 이 속성은 셀과 바코드 사이에 링크를 생성합니다:ActiveBarcode: Barcode, Excel


7


이 속성에 링크의 셀 이름을 입력합니다. 그게 다입니다!

여러 셀의 데이터를 인코딩하는 바코드를 만들려면 먼저 이러한 셀을 도움 셀로 병합해야 합니다. 그런 다음 이 결합된 셀을 바코드 개체와 연결합니다.

다음 예제에서는 셀 B3과 B4의 내용이 셀 B6에 결합되어 있습니다. 셀 B6은 바코드 개체에 연결됩니다.ActiveBarcode: Barcode, Excel

에서 VBA를 사용한 바코드 사용 및 자동화 Excel

응용 프로그램용 비주얼 베이직(VBA)을 사용하여 Excel에서 많은 작업을 해결할 수 있습니다. 여기에서는 VBA를 사용하여 ActiveBarcode 컨트롤을 임베드, 사용 및 삭제하는 방법을 보여드리겠습니다:

ActiveBarcode 컨트롤을 시트에 삽입합니다:
이 예제에서는 바코드 컨트롤이 셀 바로 위에 배치됩니다. 그러면 바코드가 셀 안에 있는 것처럼 보입니다.

먼저 셀 크기를 읽습니다:
CurrentCell = "C3"
MyHeight = Range(CurrentCell).Height
MyWidth = Range(CurrentCell).Width
MyTop = Range(CurrentCell).Top
MyLeft = Range(CurrentCell).Left
셀은 바코드가 들어갈 수 있도록 최소한의 크기가 있어야 합니다. 셀이 너무 작으면 크기 오류가 표시됩니다. 따라서 셀의 높이를 30픽셀로 조정합니다:
' Enlarge the cell height to 30 pixels
Range(CurrentCell).RowHeight = 30
다음 함수는 셀 바로 위에 바코드 컨트롤을 생성합니다:
ActiveSheet.OLEObjects.Add(ClassType:="ACTIVEBARCODE.BarcodeCtrl.1", Link:=False, _
 DisplayAsIcon:=False, Width:=MyWidth , Height:=MyHeight, Top:=MyTop + 2,_
 Left:=MyLeft + 4).Select
바코드 개체를 셀과 직접 연결할 수 있습니다:
ActiveSheet.OLEObjects(MyBarcode).LinkedCell = "B7"
컨트롤에 쉽게 액세스할 수 있도록 컨트롤의 이름을 MyBarcode 변수에 저장합니다:
MyBarcode = ActiveSheet.Shapes(ActiveSheet.Shapes.Count).Name
이제 바코드 개체의 프로퍼티메소드를 원하는 대로 사용할 수 있습니다:
' set properties
ActiveSheet.OLEObjects(MyBarcode).Object.Font.Size = 8
ActiveSheet.OLEObjects(MyBarcode).Object.Type = 14 ' Code 128
ActiveSheet.OLEObjects(MyBarcode).Object.Text = Range("C3")
컨트롤이 더 이상 필요하지 않은 경우 시트에서 삭제할 수 있습니다:
ActiveSheet.OLEObjects(MyBarcode).Delete
힌트: Windows가 매크로 내에서 예정된 이벤트(흔히 KeepWindowsAlive라고 함)를 처리해야 하는 경우 다음 VBA 함수를 사용하여 이를 강제할 수 있습니다:
DoEvents
예를 들어 컨트롤을 새로 그려야 하는 경우와 같이 필요할 수 있습니다.