솔직히 진짜 어렵네요 SSS급
(2013 가능, CSE 프리, 참조 값 내장, 1900~2050) 
단 결과는 문자
숫자가 아니라 문자 입니다.

이미지는
양력(랜덤)→음력→양력

변환을 두번했을때 같은 값이 나오는가 입니다.
노란색 셀, TRUE는 100개 모두 일치를 뜻합니다.

7만회 이상의 테스트 모두 성공

양력(랜덤)→음력 이걸 기존의 음력 변환 프로그램과 
12,000 회 테스트 모두 일치

그리고 위에 방식
양력(랜덤)→음력→양력

이것도 60,000 번 이상 테스트 모두 일치 입니다.


참조 파일은 100회 테스트 버전 입니다.

B7에 날짜 값이 있을 때

C7셀에
=IFERROR(REPLACE(SUBSTITUTE(TEXT(SUMPRODUCT((MOD(INT((MOD(INT(SUMPRODUCT(MID(SUBSTITUTE(TEXT(1/MAX(1/((B7-1-MMULT(COLUMN(INDEX($77777:$77777,1):INDEX($77777:$77777,1875))^0,(MOD(INT(UNICODE(MID("⶧⮩䫪ዬ哛啖敚⥚橗沕㬥㝉囊嚪囒ᗔ▵䥶剮㊭㒭咭㔭癋溒ᶤ⮩⭪⭪䭪ዪⓝ⤻橗檖檖檖崦㭉坒ᗔ▵⪵⪵䦶剶咮㔫㕋㕕㕕㚕⺥⮩䭲卬啚ᕪ╫⥝牗沖崥嬪嫊孊孒ᝤ◙䦺劶劶劵咶夭㩋㚓⺥ⶩ㖩ⶩ䮲፴⓭⥝⩛⪫⪛璛洦嵉孒᝔⫕⭕⫩䫚劺咮唭啕啕婕㪕⺥ⷉ䶲喬喪ᖴ╵䥝㉝璗洪洪洪浊嶒ឤ⛩䫚䫚䫚勚",INT(ROW(INDEX($SSS:$SSS,1):INDEX($SSS:$SSS,1875))/15+14/15),1))/2^MOD(ROW(INDEX($SSS:$SSS,1):INDEX($SSS:$SSS,1875))-1,15)),2)+29)*(ROW(INDEX($SSS:$SSS,1):INDEX($SSS:$SSS,1875))+{0,-1}<INT(B7/29.53059)))+0.5)*100+{1,0}))-50,"0000-")&TEXT(SUMPRODUCT(INT(((1/MAX(INDEX(1/(INT(B7/29.53059)-INDEX(MOD(INT(UNICODE(MID("檐⌡塴ⴘ䙫᳖㉢塌ᔙ䘫ᬓቢ",ROW(INDEX($SSS:$SSS,1):INDEX($SSS:$SSS,12)),1))/8^{0,1,2,3,4}),8)+INT((ROW(INDEX($SSS:$SSS,1):INDEX($SSS:$SSS,12))*5+{1,2,3,4,5}-6)*33.6-26),)+0.5),))-0.5)*{-1,1}+{1,0}*INT(B7/29.53059)+{26.2,0})/{33.6,1}*{1,100})),"0000"),"1-00","0-88")&TEXT(INT(B7/29.53059),"0000"),{1,3,3,6,8,10,12},2)*100^{0,1,2,1,2,3,2}*{1,-1,-1,1,-1,1,1})/100^{2,2,1,0}),100^{2,2,1,1})+{11,-1,0,0})/{12,1,1,1}),{1000,12,100,100})+{1899,1,0,1})*100^{3,1,2,0}),"0000-00-00-00"),"-00-","-00-윤"),5,3,"")&REPT("",1/(B7<>"")),"양력→음력")