2월 둘째주|
UNO_WEEKLY |UNO_ZEN
|
디즈니월드의 월트디즈니의 말중에,
When you are curious,
you find lots of interesting things to do
호기심을 갖으면,
아주 많은 재미있는 것을 할수 있는 것을 찾는다
나이가 먹으면 없어지는 것이 호기심이다
그러니
나이가 들어도 나이가 들지 않는 방법은
호기심을 잃지 않으려고 노력하는 ..
그런 호기심에 대한 이야기..
...
...
|
x20180212_1013_UNOZEN.
의미있는 문장을 통한 영어 패턴숙달시키기 | UNO_ZEN 윈도우버전 다운로드/설치와 업데이팅...
UNO_WEEKLY|VBA_Basic_Sereis|워크시트의 Change이벤트로 자동화
ThisWorkbook 이벤트의 활용, Find,DateDiff,Intersect,NumberFormat
지난주의 문제는 실행시작과 종료일자를 입력하면
이미 프로그래밍적으로 작성된 조건부서식에 의하여
시작과 종료간의 범위에 자동서식이 되었다
이제 이 챠트의 바를 구성하는 셀에 작업비용을 분산시켜서 기록하는 역할을 하게
하여야 하는 작업을 할 차례다
이것을 워크시트의 Change이벤트프로시져를 활용하자고 했었다
버튼을 크릭하고 실행행의 작업시작일자와 종료일자를 기록하면
실행행의 합계금액이 수식에 의하여 잘 계산되는 것을 볼수 있다
잘된다..그럴듯하다
그런데 이제 이렇게 한 것이 완벽한가??
아니다..
작업한 파일을 닫았다가 다시 열어서
어떤 작업의 시작일자와 종료일자를 다시 입력해 보시면…
작동이 안되는 것을 알수 있다
처음 만들어서 사용할때는 되던데..닫았다가 열어서 하려니 안된다
왜그럴까???
이번주에 생각해보실일...
x20180212_1013_VBABasic_UseWorkBookEvent.
UNO_WEEKLY|VBA_Advanced-
UserForm 요약보고서 월별로 정렬된 위치로 재배치하기
Value와 Text값의 차이, Do While문의 숙달,임시시트의 활용
상품별 매출순위 정렬
상품타입별 매출순위 정렬
그런데
또,
월별로도 매출순서대로
하고 싶다는 주문이 있을수있을 것이다
그것도 테이블형식이 아닌, 블록별로 떨어져있는 내용을
어떻게 정렬한다는 말인가??
사람의 요구는 한도
끝도 없으니까..
도전해볼만 하지 않은가?
지난주화일의 것을
응용을 하면 될 것이다
월별합계를 우선 만들고
월별합계대로 정렬을 하여
정렬된 순서대로 재배치하면 되는 것
요령은 임시시트등을
적절히 활용을 하는 것을 귀찮아 하지않으면 되는 것
그리고 퍼센트값이 100%인것은 정수값으로 하면 1이다
이것을 If rX.Value=1 Then 이라고 하면 누락되는 부분이 생긴다
예를 들면 0.99999와 같은 값은 1이 아니다
이때는 Value대신에 Text값을 읽는 것이 요령이다
요리,조리 함정을 피하면서 가는 것
x20180212_1013_UserFormSortingByBlock.