EGTools

□ 레이블이벤트를 사용할 클래스 추가 및 동작 지정 삽입 - 클래스 모듈 (이름 : cLblEvents ) WithEvents를 사용하여클래스 내부에 이베트를 가진 레이블을 추가 (이름: lbl ) 동작 : 레이블을 클릭하거나 더블클릭하면 Tag에 있는 날짜를 SelectedDate 인터페이스를 통해 지정 선택된 날짜를 기재하고 폼은 숨기기 Public WithEvents lbl As MSForms.Label Private Sub lbl_Click() If Left(lbl.Name, 3) = "lbD" Then lbl.Parent.SelectedDate = CDate(lbl.Tag) lbl.Parent.Hide End If End Sub Private Sub lbl_DblClick(ByVal Cancel..

□ DatePicker에서 사용할 내부 변수 및 인터페이스 설정 내부에서 사용할 변수로 date_Selected를 선언 이 변수를 설정하고 읽어올 인터페이스를 정의 (Let, Get) Private date_Selected As Date Public Property Let SelectedDate(argDate As Date) date_Selected = argDate End Property Public Property Get SelectedDate() As Date SelectedDate = date_Selected End Property □ 달력을 만드는 프로시저 생성 인수 : 연도(필수), 월(필수), 일(선택) 레이블의 이름을 기준으로 레이블 컨트롤을 지정하여 날짜 및 서식을 적용 (lbD1~42,..

□ User Form 추가 이름 : formCalendar Caption : DatePicker 날짜에 사용할 Control을 선택 : 명령단추나 레이블 등을 사용할 수 있는데 여기 설명에는 레이블(Label) 기준으로 진행 □ 주차명에 해당하는 레이블 생성 왼쪽에 주차번호를 넣고, 일~토요일 7개를 넣어야 하므로 적절한 위치에 첫번째 레이블 생성 첫번째 레이블 - 이름 : lbT1 - 크기 : Width = 15, Height = 15 - Caption : 일 - TextAlign : fmTextAlignCenter - Font : 맑은 고딕, 보통, 크기=10 두번째 ~ 일곱번째 레이블 : 첫번째를 복사 - 이름을 lbT2 ~lbT7 으로 수정하고, Caption을 월~토 로 수정하고 적절한 간격으로..

【 함수 요약 】 기원전(BC) 4713년 1월 1일을 기점으로 하는 율리우스적일 (Julian Day Number)을 실제 날짜로 환산 현재 사용중인 그레고리력과 율리우스력 날짜를 지정하여 결과 확인 주로 천문연구에서 사용하는 날짜개념임 이 함수는 EGTools 추가기능에서 지원하는 함수입니다. 【 적용 버전 】 Windows용 : 모든버전 【 함수 구문 】 = JDTODATE ( JD, [Gregorian] ) 【 함수 인수 】 인수명 옵션 기본값 설 명 JulianDay 필수 없음 기원전(BC) 4713년 1월 1일을 기점으로 하는 율리우스적일(Julian Day Number) Gregorian 선택 True 결과를 적용할 역법, 현재 표준인 그레고리력 날짜인지 여부, 기본값은 True, False..

【 함수 요약 】기원전(BC) 4713년 1월 1일을 기점으로 하는 율리우스적일 (Julian Day Number)을 계산현재 사용중인 그레고리력과 율리우스력 날짜를 지정하여 계산주로 천문연구에서 사용하는 날짜개념임 이 함수는 EGTools 추가기능에서 지원하는 함수입니다.【 적용 버전 】Windows용 : 모든버전 【 함수 구문 】= JULIANDAY (  SolarDate , [Gregorian]  ) 【 함수 인수 】인수명옵션기본값설    명SolarDate필수없음양력날짜 문자열YYYY-MM-DD, YYYY/MM/DD, YYYY.MM.DD, YYYYMMDD 형식Gregorian선택True현재 표준인 그레고리력 날짜인지 여부, 기본값은 True, False로 지정하면 율리우스력 날짜로 적용하여 계산 ..

셀레니움을 이용하여 Chrome으로 Web 문서를 조회할 때 갑자기 아래처럼 오류가 발생하며 더이상 진행을 할 수 없을 때 처리가 필요합니다. 에러코드 26에 UnexpectedAlertOpenError인데, 실제 웹페이지에서는 메시지 팝업이 되는 것입니다. 아래와 같이 Error 처리하고 다음 단계로 넘어갑니다. On Error GoTo ERR_HD For r = LBound(vD, 1) To UBound(vD, 1) '// User code area NEXT_ROW: Next r WD.Close SEt WD = Nothing Exit Sub ERR_HD: If InStr(1, Err.Description, "Alert") 0 Then WD.SwitchToAlert.accept '// or WD.Swi..

【 함수 요약 】 ISO 2859-1와 KS Q ISO 2859-1에 규정된 샘플링 방식에서 LOT크기와 AQL, 검사방법에 따라 품질합격불량수를 구합니다. 이 함수는 EGTools 추가기능에서 지원하는 함수입니다. 품질샘플링 관련 별도로 배포하는 파일에 이미 배포된 내용이므로 참고하시기 바랍니다. 【 적용 버전 】 Windows용 : 모든버전 【 함수 구문 】 = SAMPLINGAC( LotSize , AQL , [sampleType], [Inspection] , [Plan], [Round] ) 【 함수 인수 】 인수명 옵션 기본값 설 명 LotSize 필수 없음 검사할 LOT/Batch의 수량 (2개 이상) AQL 필수 없음 합격품질한계 AQL, 부적합품률 및 100아이템당 부적합수 sampleTyp..

【 함수 요약 】 ISO 2859-1와 KS Q ISO 2859-1에 규정된 샘플링 방식에서 LOT크기와 AQL, 검사방법에 따라 검사할 시료수를 구합니다. 이 함수는 EGTools 추가기능에서 지원하는 함수입니다. 품질샘플링 관련 별도로 배포하는 파일에 이미 배포된 내용이므로 참고하시기 바랍니다. 【 적용 버전 】 Windows용 : 모든버전 【 함수 구문 】 = SAMPLINGSIZE( LotSize , AQL , [sampleType], [Inspection] , [Plan] , [Round] ) 【 함수 인수 】 인수명 옵션 기본값 설 명 LotSize 필수 없음 검사할 LOT/Batch의 수량 (2개 이상) AQL 필수 없음 합격품질한계 AQL, 부적합품률 및 100아이템당 부적합수 sample..

【 함수 요약 】 BARCODE함수는 바코드 이미지를 생성 발행하는 함수입니다. 1D Barcode : Code128, Code39, EAN13, EAN8, Interleaved 2of5 , 2D Barcode : QR Code, Data Matrix, PDF417, Aztec Code, GS1 Barcode : GS1-128, GS1-DM 형식을 지원합니다. 이 함수는 EGTools 추가기능에서 지원하는 함수입니다. 바코드 발행만 지원하는 별도 추가기능 버전도 있으니 참고하세요. 【 적용 버전 】 Windows용 : 모든버전 【 함수 구문 】 = BARCODE( Text , [Type] , [fColor] , [bColor] ) 【 함수 인수 】 인수명 옵션 기본값 설 명 Text 필수 없음 Barco..

Barcode 발행 매크로를 만들면서 2D Array에 담고, Excel sheet에 붙여 넣어서 그림으로 복사하는 방식을 사용했는데 이렇게 사용할 경우 함수로는 사용할 수 없어서 Array로부터 직접 BMP파일을 생성하여 삽입하는 방식으로 정리하였습니다. BMP파일을 일반적인 24bit로 만들경우 용량이 커지는 문제가 있어서 1bit 단일색상 BMP 파일로 최소한으로 만들기 위해서 정리했습니다. 색상표현 관련하여 제대로 표시되지 않은 문제를 v2.5로 개선했습니다. BMP파일은 Version 3형식을 선택 (이유는 간단하므로,,,) 구조는 아래처럼 총 4가지 구조로 되어 있으며 File Header DIB Header Color Table Image Data 아래 구조에 대한 참고: http://jus..