XL 엑셀 Code Snippet

20200414 2132 

 

tag; file name file path 

 

REF

[1] "https://support.office.com/ko-kr/article/%EC%85%80%EC%97%90-%ED%98%84%EC%9E%AC-excel-%ED%8C%8C%EC%9D%BC-%EC%9D%B4%EB%A6%84-%EA%B2%BD%EB%A1%9C-%EB%98%90%EB%8A%94-%EC%9B%8C%ED%81%AC%EC%8B%9C%ED%8A%B8-%EC%82%BD%EC%9E%85-186833c6-c899-4912-a14c-240c2eb51e0b"

[2] "https://m.blog.naver.com/PostView.naver?isHttpsRedirect=true&blogId=22wowow22&logNo=220897405318"

[3] "https://www.tek-tips.com/viewthread.cfm?qid=1257072"

[4] "https://www.ablebits.com/office-addins-blog/2014/05/15/excel-insert-hyperlink/"

 

01 현재파일이름만 삽입 [1]

=MID(CELL("filename"),SEARCH("[",CELL("filename"))+1, SEARCH("]",CELL("filename"))-SEARCH("[",CELL("filename"))-1)

 

02 현재파일이름과 현재워크시트 이름 [1]

=RIGHT(CELL("filename"),LEN(CELL("filename"))- MAX(IF(NOT(ISERR(SEARCH("\",CELL("filename"), ROW(1:255)))),SEARCH("\",CELL("filename"),ROW(1:255)))))

 

03 엑셀 이미지가 있을 때 데이터 필터, 정렬하는 방법, 이미지 셀에 넣기

"durisit.tistory.com/20"

이미지 속성을 "move and size"로 하면 필터링할 때 이미지가 숨겨지거나 나타나게 된다.

- 하지만 이미지를 셀 값으로 인식할 수는 없다.

예) Table을 만든 뒤, Table 위에 포커스를 두고 Alt ⟼ Q, then "form"을 눌렀을 때, 이미지가 해당 레코드에서 보이지는 않는다. ▶  name "a'의 image 값은 비어있다.

 

04 VBA Convert integer(number) to string

"www.automateexcel.com/vba/convert-number-to-string/"

 

05 sheet number, sheet name 알아내기

"www.howtoexcel.org/tips-and-tricks/how-to-generate-a-list-of-sheet-names-from-a-workbook-without-vba/"

- "=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"")"를 Name에 사용하면 되는데..

- GET.WORKBOOK함수는 EXCEL 4 MACRO함수이고..이 함수는 NAME에서만 사용가능하다.

▶ SEE "https://exceloffthegrid.com/using-excel-4-macro-functions/"

 

06 How to create external reference in Excel to refer to another sheet or workbook

"www.ablebits.com/office-addins-blog/2015/12/08/excel-reference-another-sheet-workbook/"

 

07 현재 파일 경로 [2] ;  current folder, path

=Left(CELL("filename", A1), Find("[", CELL("filename", A1)) - 1)

 

08 Hyperlink 함수로 셀, 다른 시트의 셀 연결하기 [3], [4]

① A1셀에 시트 이름이 있을 때, =HYPERLINK("#"&A1&"!C3",A1&"!C3")  [3]

② 연결할 셀 주소가 Sheet2에 B4일 때, =Hyperlink("#Sheet2!B4") [4]