VBA280 [VBA] Haja_계산기 V2.0 (feat. 클래스모듈) 코드에 대한 주석은 V3.0 (공학용계산기)를 만든 후 공개하도록 하겠다. 2022. 5. 24. [VBA] 조건부수식 대체하기 본인도 한때 엑셀로만 작업을 하였던 때가 있었다.. 시트가 고정되어 있고 그 값에서만 조건을 걸어야 한다면 간단하게 조건부 수식을 거는게 시간적으로 훨씬 유용하다. 허나 매월 매출일보가 달라져서 날짜가 계속 변경되어야 하고 자잘하게 계속 값이 변경된다면 그또한 월별 스트레스 일것이다. 코드 진행은 이렇다. 1. 오픈이벤트를 걸어서 파일이 열리면서 작업이 되도록 한다. 2. 각 시트에 월값이 변경이 되었을 때 역시 1번과 같은 이벤트가 발생한다. (연도 변경시는 이벤트가 발생하지 않아서 연도 변경 후 월을 다시한번 선택하여야 한다.) 그냥 둘다 변경되도록 수정하였다 3. 매출일보가 많아지면 시트를 순환하지 말고 가장 최신의 시트만 처리되도록 코드를 수정하도록 하는것을 권장한다. 4. 보통 매출일보의 날짜는.. 2022. 5. 24. [vba] 완전수를 구하시오(Feat. VBA공부중) 완전 수 : 자연 수 N값까지 숫자중 자기 자신을 제외하고 약수의 합이 자기 자신이 되는 수 코드진행 - 일단 약수는 나머지가 0이어야 하기 때문에 Mod 함수를 사용하여야 한다. - 시작 수를 어떤수부터 할건지 / 마지막은 어떤수로 마무리 할건지 : 소수는 2,3,5... 이런식으로 시작하기 때문에 4부터 시작을 한다. : 약수는 항상 자기 자신을 제외하고 1/2 까지이다. : 10인 경우 약수는 1,2,5,10 자기 자신인 10을 제외하곤 10의 1/2 인 5까지 이기 때문에 : 순환문을 1부터 n / 2 까지 순환하면 된다. - 완전수를 어떤식으로 구할건지 : 약수의 합과 자기 자신과의 합을 구하면 되니까 약수들의 합과 자기 자신과 같은지 확인한다. 2022. 5. 18. [VBA] GetObject + Application.Match (feat. Vlookup 대체) 보통 이러한 작업을 하기 위해서는 출력할 영역과 DB영역이 동일한 워크북에 있으면서 Vlookup으로 끌고오는 작업을 하게 된다. 그렇게 되면 수식을 모두 걸어놔야 되고 그 수식을 본인 아닌 누군가가 수정을 할 수 없도록 Undo 코드를 추가로 작성하여야 한다. 오늘 할 코드는 [성명] 을 기준으로 각 데이터를 긁어오는 Change이벤트를 통해서 Vlookup과 같은 작업을 해보도록 하겠다. 물론 여기서도 Vlookup을 이용해도 되지만 DB에 카드번호가 성명보다 왼쪽에 있기 때문에 정상적으로 값을 가져오지 못할 것이다. 해서 Application.match로 행번호를 추출한 후 Cells로 해당값들을 끌고 올 수 있도록 하겠다. 엑셀을 조금만 할 수 있는 분들은 Match함수의 사용법과 같은 방법이기 .. 2022. 5. 18. 이전 1 ··· 45 46 47 48 49 50 51 ··· 70 다음
