UNION3 [기초방] VBA 100제 #58 [ 불일치 영역 색칠하기 ] 각각의 이름중에 같은 열에 [불일치]가 포함되어 있으면 그 사람의 해당열을 노란색으로 칠하는 구문이다. 금일 본인의 코드에서는 복수의 행이 아닌 단일 행이 있는 경우라면 제대로 표현이 되지 않을 것이다. 이것은 기초방 59번 문제에서 해결해보려고 한다. 더보기 Option Explicit Sub 기초방58() Dim rngAll As Range: Set rngAll = [d5:j24] Dim rngA As Range Dim rngU As Range rngAll.Interior.Color = xlNone '= 초기화 For Each rngA In rngAll Do Until Cells(rngA.Row, "c") Cells(rngA(2, 1).Row, "c") '= 순환셀과 바로 밑에 셀의 일치 여부 If .. 2023. 7. 11. [기초방] VBA 100제 #3 [ 나를찾아줘 ] 행을따라 움직이면서 [엑사남] 값들만 Union으로 묶어서 한번에 서식화하는 문제이다. 해당 코드는 [시훈아빠]님의 코드로 엑사남님도 칭찬해줬던 코드이고 본인역시 기본에 충실한 코드임을 인정한다. 여기서는 Union 사용이 중요한데 이때 젤 처음 rng_T Set부분이 좀 까달롭다.. 이부분은 필수구무이기 때문에 반드시 습득해야 하는 스킬이다. 그리고..... 아직도 어미품에 있는 새끼새 두마리....아주...난리다... 이제 둥지를 떠날때도 되었는데.... 농담이고 정말 본인을 뜨겁게 하는 딱총님과 무지님이다... 참 코드 간결하고 이쁘다 무지님도 노력과 상승세가 무섭다... 참 이들과 함께 하는것이 참 영광이다. 위에서 모범답안들이 이미 나와서 본인은 자동필터로 구현을 하였다 솔직히 정렬 문제도 그렇.. 2022. 12. 26. [VBA] VBA에는 없는 차집합 여집합 구성 우리가 많이 사용하는 Union과 Intersect를 사용하면서 혹시 그런 생각을 갖을적은 없는가?? 차집합과 여집합은 어떻게 표현하는 함수는 없을까???? 어....없어 없다고 하니 만들어 보자... A영역과 B영역이 있다고 하자 그들사이에 교집합 영역이 있다고 하면 교집합 영역을 어떤식으로 제거 해주냐에 따라 여집합과 차집합을 구할 수 있다. 여기만 생각해 놓고 혹시나 For 문으로 영역의 색상 값을 읽어서 A,B 영역과 교집합을 구분지으려고 했다면 Specialcells를 공부해 보길 바란다. 굳이 포문을 안태워도 값의 있고 없음을 각각의 셀이 아닌 전체 영역으로 한번에 값을 읽어오기 때문에 코드를 다이어트 할 수 있다. 교집합에 값을 넣고 빼면서 우리가 원하는 집합의 구성을 할 수 있다. Opti.. 2022. 4. 12. 이전 1 다음
