EGTools

어떤 분이 조선왕조실록의 날짜를 변환하는 방법을 Excel로 구현하셨길래,1900~2100년의 음력/양력 변환을 함수로 만들어 둔것도 있고,천문연구원의 음력/양력 API를 이용하여 기원전 59년부터 일일 날짜 정보를 수집한 것도 있고,,,이 자료를 이용해서 API없이 1300~2100년까지 음력/양력 변환 및 조선왕조실록 기사에서 음력 또는 양력(그레고리력)으로 변환할 수 있도록 함수를 만들었습니다. EGTools 추가 기능에서 필요한 함수만 뽑아와서 만들었으므로 조금 가볍게 사용할 수 있습니다.혹시 EGTools 추가기능을 사용하시는 분은 중복사용하지 않도록 주의하세요.(중복 사용시 동일 함수명으로 어떤 부작용이 있을지 알 수 없습니다) 사용후 결과를 점검해 보시고, 오류가 있으면 알려 주세요. 최종수..

EGTools 추가기능에서 지원하는 음력 변환 함수인 ToLunar() 함수에 대한 소스코드 설명입니다. 천문연구원의 API를 이용하여 음력으로 전환할 수도 있지만, Excel은 인터넷이 없는 환경에서도 양력을 음력으로 변환할 수 있도록 만들었습니다. 지원되는 양력 구간은 1900-01-01부터 2100-12-31까지입니다. (2023.08-23일 확장) 10여년도 훨씬 전에 SQL Table로 만들어서 변환하던 것에서 착안하여 VBA에서 Table보다는 Array를 이용하는 것이 훨씬 유리하기 때문에 Array를 이용한 날짜 세기 방식으로 만든 것입니다. 배열은 3개를 사용합니다. Dim LY As Variant, LM As Variant, LType As Variant Ltype()에는 각 월의 날수..

【 함수 요약 】음력일자를 날짜형식의 양력으로 변환(변환가능일자 : 인터넷사용시 - 기원전 음력59년  ~ 2100년, 인터넷 미사용시 1900~2100년)  이 함수는 EGTools 추가기능에서 지원하는 함수입니다.양력을 음력으로 변환하는 함수는 TOLUNAR입니다.【 적용 버전 】Windows용 : 모든버전 【 함수 구문 】= TOSOLAR (  Date , [ LeapMonth ] , [ Delimiter ] , [ API ] ) 【 함수 인수 】인수명옵션기본값설    명Date필수없음양력으로 전환할 날짜형식의 문자열로 아래 4가지 형태를 지원함YYYY-MM-DD, YYYY/MM/DD, YYYY.MM.DD, YYYYMMDD(v4.3.3 예정) YYYY-MM-DD(윤), YYYY-윤M-DD 형태 추가..