EGTools

오늘 VBA 매크로 기능중 이상한 내용이 있어 확인을 했습니다. 셀 내용을 Array로 전환한 다음 각 셀의 내용이 없는 것과 Format(값, "YYYY-MM")으로 당월인지 확인하는 과정이 있었는데, 아래와 같은 IF문을 거치면 Array내의 Empty 값이 Null로 변환이 되어 계속 예상하지 못한 결과가 나왔습니다. IF Format(vData(r, c), "YYYY-MM") = "2023-03" Then 그래서 별도로 빈 Array를 하나 만들어 점검해 봤는데, 이러네요... Sub testEmptyTurnToNullError() Dim vData As Variant, r As Long, c As Long, EmptyCount As Long, NullCount As Long ReDim vData..

다양한 바코드를 생성할 수 있는 별도의 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 코드만으로 바코드를 생성하는 매크로 ..

【 함수 요약 】 RZ 함수는 0이나 빈셀, 오류를 빈문자열("")로 변환합니다. (Remove Zero) Excel 2019 이하에서 EGTools에서 동적배열로 반환되는 함수에서 IFERROR를 적용하지 못하는 것을 보완할 수 있습니다. 이 함수는 EGTools 추가기능에서 지원하는 함수입니다. 【 적용 버전 】 Windows용 : 모든버전 【 함수 구문 】 = RZ( Data , [Ignore] ) 【 함수 인수 】 인수명 옵션 기본값 설 명 Data 필수 없음 변환할 값이나, 배열 또는 영역 Ignore 선택 7 제거할 값을 지정합니다. 1= 0 2 = 빈값 3 = 오류 각 옵션은 더하기 하여 지정합니다. 예) 7 = 1+2+4로 0, 빈값, 오류 모두 제거합니다. 【 함수 상세 설명 】 Exce..

주말에 바코드 관련 정보를 검색하다가 바코드를 전용 Font와 함께 사용할 수 있는 소스를 알게 되어 소개합니다. http://grandzebu.net/informatique/codbar-en/codbar.htm 아주 오래된 소스이기는 하지만, GNU - GPL로 소스와 폰트를 제공하고 있어서 VBA에서 쉽게 사용할 수 있습니다. Font는 아래 Zip파일을 해제한 다음에 오른쪽 마우스 메뉴를 통해서 설치하시면 됩니다. EAN13과 EAN8은 ean13.ttf를 공용으로 사용합니다. 함수는 EAN13과 EAN8이 알수 없는 내장함수로 #REF오류가 나므로 함수 이름을 모두 Barcode를 추가한 이름으로 변경하여 제공합니다. 바코드 출력 부분에는 해당 Font를 적용해야 바코드로 출력됩니다. 2D 바코드..

범위내에 그림의 수를 확인하고 싶을 때 사용할 수 있는 함수입니다. 함수는 대상 영역에 그림/시진을 추가한다고 함수 결과가 즉시 반영되지 않습니다. 함수를 사용한 후에 그 결과를 다시 사용할 경우에는 반드시 사용셀을 재입력하세요. F9키로 재계산으로 해도 반영되지 않으며, 반드시 F2 키나 더블클릭으로 셀 수정 상태에서 Enter나 Tab키로 입력합니다. CountP( 범위 ) : 셀의 왼쪽위 꼭지점이 범위에 있으면 숫자를 셈 CountPA( 범위 ) : 그림이 범위내에 걸치기만 해도 숫자를 셈 Option Explicit Public Function CountP(aRange As Range) Dim oPic As Shape, iCnt As Long For Each oPic In aRange.Parent..