본문 바로가기
VBA

[VBA-재귀함수] 목표값찾기

by 일등미노왕국 2021. 8. 23.

엑사남 오픈챗방에서 질문하신 내용을 약간 수정해서 만들어 보았다. 

https://open.kakao.com/o/glXWEB3b

 

유튜브 '엑사남'의 Excel VBA 함께하기

[방암호 : M으로 시작하는 VBA 메세지창 명령어는? 'MsgB**', 힌트 : 6글자, **은 소문자] #엑셀 #excel #VBA #엑사남

open.kakao.com

먼저 이 질문에 답을 하기 위해서는 값이 주어졌을 때 1부터 마지막까지 하나씩 누적하면서 모든수를 결합할 수 있어야 한다. https://1stminokingdom.tistory.com/26

 

[VBA_재귀함수] 삼각형 조합하기

 이번에 사용될 재귀함수 구문은 입력된 텍스트를 통해서 자기 자신부터 하나씩 조합하여 마지막 전체 텍스트 값을 모두 출력하는 재귀함수 구문이다. 이 구문의 핵심은 이렇다. FOR 문을 통해

1stminokingdom.tistory.com

위 코드가 이해가 되어야만 아래 코드를 이해할 수 있다. 천천히 작은 문자부터 넣어서 조합해 보길바란다.

일단 총 40개의 매출에서 입금된 금액과 일치하는 것을 도출하는 것인데 가지수가 많다보니 시간이 너무 걸려서 하단에 상태바를 추가하여 진행사항을 알 수 있게 만들었다.

단, 여기에 알아둬야 하는 사항은 해값과 목표액의 차이가 많이 나야 한다는 것이다. 그렇지 않을 경우 재귀를 처음부터 끝까지 다 돌려야 하므로 에러가 날 수 있다. 

상위프로시저
하위프로시저

도출된 값이 E5셀부터 차례대로 출력이 되고 그 영역을 선택시 C열에 해당 위치가 뿌려지는 이벤트를 넣었다.

이벤트구문
해찾기(21.08.23).xlsm
0.03MB

댓글