강좌 / 팁

소프트웨어 [추가기능1.1]엑셀 셀의 행-열 Auto-Highlight 하는 방법들

2021.11.10 17:15

지후빠 조회:2796 추천:103

새로운 버전을 올려서 이곳 첨부파일은 삭제합니다.^^

새로운 게시물; https://windowsforum.kr/lecture/16978048


수정버전 1.1>

불필요한 코드를 줄이고 손댄김에 (한칸이 비어서) "정보" 아이콘을 추가하였습니다. ^^ Reading Layout 1.1.zip 암호는 동일합니다.

ReadingLayout1.1.png

ReadingLayout1.1info.png

 


<추가2>

죄송합니다. 이번에는 수요 조사 차원에서 첨부파일 Reading Layout.zip 에 암호를 걸었습니다.ㅠㅠ

- 윈도우 포럼에 엑셀 게시물이라서... 필요하신 분이 얼마나 있을까 싶기도 해서...

"추천" 해주신 분께 암호를 보내도록 하겠습니다. 몇 주 지나면 암호도 공개하겠지만요.^^ (12월1일쯤에...)

- 추천 해달라는 것은 추천이 댓글 보다는 쉬울 것 같아서 입니다. 오해 없으시기 바랍니다. ㅋ~

 

추가 기능 자체에는 암호 설정을 하지 않아서 VBA 코드를 볼 수 있습니다.

사실 몇 줄 안되거든요. 아래 3번째 Sheet1 범주를 벗어나지 않습니다.

(과거 추가기능을 만들어 제공한 적이 있는데 의뢰인이 보호를 요구하여 유료로 구입한 보안 프로그램도 있습니다만... )

 

당부의 말씀을 드리면, 문서 속성 탭의 정보는 수정하지 말아주셨으면 합니다.^^

readinglayout.gif

 


<추가1>

있었으면 좋겠다고 생각한 기능이어서 엑셀 추가기능으로 만들었습니다.

참고한 사이트; https://docs.microsoft.com/en-us/office/troubleshoot/excel/create-application-level-event-handler

잘 안쓰는 클래스모듈 사용이라 공부 좀 했다는... 첨부 파일에는 두개 파일이 들어 있습니다.

- Reading Layout.xlam ; 추가 기능

- Reading Layout 설치.vbs ; 이 것을 실행하면 자동으로 추가 기능을 설치해줍니다.

2021-11-11_002443.jpg

2021-11-11_002500.jpg

 

- 추가 기능 화면에서는 다음처럼 보입니다. (참고하시라고 첨부했습니다.)

2021-11-11_001450.jpg

 

- 추가 기능이 설치되면 리본 메뉴의 "보기" 탭의 끝에 "셀 좌표"라는 버튼 그룹이 생깁니다.

2021-11-11_001731.jpg

- 시작을 실행하고 셀을 더블 클릭하면 아래 3번의 첫번째 화면 같이 가로 세로 위치가 강조되는 화면을 볼 수 있습니다.

 

 


안녕하세요? 오전에 쪽지 받고 예전에 해봤던 것과 새로운 것 몇 가지 정리하여 봅니다.

 

엑셀에서 셀 데이터가 많을때 특정 셀을 선택 했을때, 같은 행과 열의 셀들을 쉽게 구분하고 해당셀도 쉽게 인지 할 수 있도록하는 기능입니다.

엑셀 추가기능인 Kutools 에 Reading Layout 기능으로 유명한 것인가 봅니다. 요즘 모니터가 커져서 있으면 좋을 기능인 것 같기는 합니다.

그래서인지 구매해야하는 Kutools 없이 비슷한 기능을 구현하고 싶어하는 분들이 있는 것 같습니다.

 

미리 말씀드리면 아래 1, 2번 방법은 구현은 가능하나 기존 셀 서식을 해치기 때문에 효용이 떨어지고 3번은 추천할 만 한 것 같습니다.

- 3번이 가능하여 사용할 수 있는 수준에 도달하여 게시물을 올리게 되었습니다.

- 아래 첨부한 파일들을 열때 매크로 경고에서 "컨텐츠 사용"으로 열어야 합니다.

 

1. 셀 색상을 부여하는 방식과 제가 추가한 드로잉을 이용하는 방식; Auto-Highlight Row&Column Of Active Cell.xlsm

- 전에 자유게시판에 올라온 질문글; https://windowsforum.kr/free/16758488

- 구글 검색에서 건진 사이트; https://www.extendoffice.com/documents/excel/1494-excel-highlight-active-row-and-column.html

- alt+F11을 누른후 좌측 트리에서 해당 시트를 더블 클릭하면 해당 코드를 볼 수 있습니다.

0-1.png

- "셀 색상 이용" 시트는 구글 검색 링크에 얻은 코드에 해당 셀은 색상을 넣지 않도록 수정한 것입니다.

1-1.png

- "도형 이용" 시트는 사각형 박스를 4개 그리는 방식입니다.

1-2.png

- "선 이용" 시트는 "도형 이용"과 비슷하게 선을 그리는 것이구요.

1-3.png

 

2. 조건부 서식을 이용하는 방식; Auto-Highlight with Conditional Formatting.xls

- 오전에 질문 주신 내용이고 관련 링크입니다. https://sensol2.tistory.com/14

- 단, 여러 시트에 이벤트 프로시져가 필요해서 저는 "현재_통합_문서"에다가 다음과 같은 프로시져를 넣었습니다.

    Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

        ActiveSheet.Calculate

    End Sub

- Sheet1 ;링크에 있는 수식 =OR(CELL("col")=COLUMN(),CELL("row")=ROW())

2-1.png

- Sheet2; =AND(CELL("col")=COLUMN(),CELL("row")=ROW()) 처음 시작하는 =OR 를 =AND 로만 바꿨습니다.

2-2.png

- Sheet3; =ABS(CELL("col")-COLUMN())+ABS(CELL("row")-ROW())=1

2-3.png

- Sheet4; 위 Sheet3에서 셀을 3개씩으로 연장해봤습니다.

=AND(ABS(CELL("col")-COLUMN())+ABS(CELL("row")-ROW())<4,OR(ABS(CELL("col")-COLUMN())=0,ABS(CELL("row")-ROW())=0),ABS(CELL("col")-COLUMN())+ABS(CELL("row")-ROW())>0)

2-4.png

 

3. 선택한 셀의 행과 열을 추가적으로 선택하는 방법; 추천하는 방법입니다. 셀을 더블 클릭해보십시오. Auto-Highlight with Row-Col Selection.xls

- 심플하면서 기존 포멧에 영향을 미치지 않아서 제 생각에는 최선책인 것 같습니다.

- 해당 시트뿐만 아니라 해당 문서 모든 시트에서 같은 효과를 보시려면 각 시트의 모듈에 코드를 넣을 것이 아니라

 "현재_통합_문서" 모듈에 다음과 같은 프로시져를 넣어야 합니다.(첨부 파일에는 이미 추가되어 있지만 주석처리 해두었습니다.)

    Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

        With Target.Cells

            Sh.Range(.Address & "," & .EntireColumn.Address & "," & .EntireRow.Address).Select

        End With

    End Sub

- Sheet1; 선택행의 행과 열을 추가적으로 선택하여 강조되게 보임.

3-1.png

- Sheet2; 십자 모양을 선택

3-2.png

 

필요하신 분은 수정하여 사용해보시면 좋겠습니다. 역시 게시물 작성은 시간이 많이 가네요. ㅠㅠ


오후 6시 추가; 3번 첫번째는 다운 받은 샘플을 보고 알았는데 어떤 책인지 한참을 찾다가 결국 발견하였습니다.

해당 코드는 101 Ready-To-Use Excel Macros ; https://www.wiley.com/en-us/101+Ready+To+Use+Excel+Macros-p-9781118281215

Chapter 30에 있는 내용입니다.

번호 제목 글쓴이 조회 추천 등록일
[공지] 강좌 작성간 참고해주세요 gooddew - - -
4075 소프트웨어| 실컴에서 wim 생성이 실패하는 이유를 찾은 것 같습니다. [7] heykevin 1284 5 01-08
4074 윈 도 우| korwbrkr.lex 파일없이 검색하기 [10] PC_Clinic 726 9 01-07
4073 윈 도 우| Nsudo (최고권한) 컨텍스트 메뉴 [14] 슈머슈마 1579 14 01-06
4072 윈 도 우| NotePad 파일연결 레지스트리입니다. [12] PC_Clinic 1422 21 01-04
4071 소프트웨어| 백업/복구 솔루션 제작시 불상사 막기 위한 준비 [8] 내꼬 2324 11 01-02
4070 윈 도 우| 실행파일을 지속적으로 관리자계정으로 고정하기 [4] 타천사둘리 1355 3 12-31
4069 소프트웨어| [팁] 크롬 이용 암호 걸린 PDF 파일에서 암호 제거 후 저장... [4] asklee 1561 5 12-29
4068 윈 도 우| 노트패드 대체 suk님 작품 [10] 슈머슈마 2148 17 12-29
4067 윈 도 우| 윈도우 업데이트 활성화/비활성화 (요청) [14] 슈머슈마 2576 22 12-28
4066 윈 도 우| 디펜더 켜기/끄기 (요청) [19] 슈머슈마 7531 30 12-28
4065 윈 도 우| 저번에 이어서 스케줄러 등록 [6] 슈머슈마 1000 10 12-28
4064 윈 도 우| PE 네트워크 설정하는 방법입니다. [2] PC_Clinic 1462 13 12-27
4063 윈 도 우| PE에 최신드라이버 통합하지 않고 사용하기 [13] PC_Clinic 1731 19 12-25
4062 윈 도 우| (수정)PE에서 화면 DPI 설정에 대한 팁입니다. [11] 지후빠 1154 10 12-25
4061 윈 도 우| 무대뽀 UEFI PE 시스템 만들기(수정완료) [3] PC_Clinic 1686 12 12-25
4060 윈 도 우| PE 실행해서 윈도우 설치하는 과정입니다. [7] 하늘은높고 1341 6 12-25
4059 소프트웨어| MSEdge_Browser_64_XPE_File.Script 수정방법 [11] @카리스마 1710 18 12-17
4058 윈 도 우| 스냅샷 백업 복구 [46] 슈머슈마 4155 41 12-10
4057 윈 도 우| 무대뽀 UEFI 부팅 USB만들기 [18] PC_Clinic 4280 23 12-05
4056 윈 도 우| 윈도우 부팅 오류 복구 + RSImageX 조합 BCDboot 임의 삭제... [10] 무월 2644 18 12-04
XE1.11.6 Layout1.4.8