본문 바로가기

전체 글353

[VBA] 네이버사전 LV6(수정완료) 네이버사전의 값이 Json 형태로 변경되면서 Haja_Dic.LV5를 공개하였다. 댓글로 기존 뜻을 하나만 가져오는것을 모든 뜻을 가져오도록 요청을 하셔서 일부 코드를 수정하여서 LV6 버전을 올린다. 뜻이 사전마다 같은것들이 중복될 수 있어서 혹여나, 같은뜻이 있으면 그 뜻은 제외하는 코드를 넣어서 계속적으로 줄바꿈으로 뜻을 누적하여 뿌려주는 형태로 만들어 보았다.. 마지막으로는 작은 팁이지만 행의 높이를 맞추기 위해서 autofit을 사용하였으니, 참고하길 바란다. 코드 자체의 이해는 LV5의 글을 참고하길.. https://1stminokingdom.tistory.com/349 [VBA] 네이버 영어사전 LV5.(댓글 또 요청) 네이버 사전이 json구조로 변경이 되어서 lv4에서 lv5로 업데이트.. 2024. 3. 17.
[VBA_파일통합] 폴더속 파일 통합하기 폴더속 엑셀 파일들을 [통합]시트에 합치는 작업을 하려고 한다. 유의해야 할것은 각각의 파일들에서 헤더값들은 중복이 됨으로 헤더값을 제외한 DATA 영역의 값만 가져오는것이 관건이다. '= 헤더값을 제외한 내용부분 Set srcRange = ActiveSheet.UsedRange.Rows("2:" & ActiveSheet.UsedRange.Rows.Count) 이렇게 하면 헤더값이 아닌 2행부터 데이터가 있는 값들을 가져올 수 있기 때문에 헤더중복을 피할 수 있다. 더보기 Option Explicit Sub 파일통합() Dim srcRange As Range Dim destRange As Range Dim str$ Dim n& Dim Strpath$, Filename$ Sheets("통합").[a2:i1.. 2024. 3. 16.
[GAS] 데이터유효성검사 [ newDataValidation ] 스프레드시트에서 일정영역의 데이터 값의 원하는 기준에 부합하는지 확인하는 스크립트이다. function validateMySpreadsheet(){ let cell = SpreadsheetApp.getActive().getRange('B1:B8'); // 영역설정 let rule = SpreadsheetApp.newDataValidation() // 유효성 검사 설정 .requireNumberBetween(1,800) // 허용 데이터 범위 .setAllowInvalid(false) // 허용 X .setHelpText('Number Must be between 1 and 800') // 경고문구 .build(); // 실행 cell.setDataValidation(rule); // 셀에 적용 } 이상 .. 2024. 3. 14.
[심화방] VBA_심화_100제 #21 [ 서울시 상권분석 크롤링 ] 회사 업무중에 서울시 상권분석을 하기 위해 참조한 사이트를 소개하려고 한다. 서울시 상권분석 서비스 (seoul.go.kr) 서울시 상권분석 서비스 Chrome, Microsoft Edge, Safari등 타 브라우저 이용 부탁드립니다. 이 브라우저는 서비스 지원이 곧 종료되어 최적화된 서비스 제공을 위해 Chrome, Microsoft Edge, Safari 등 타 브라우저로 서비스 이용 부탁드 golmok.seoul.go.kr 이 사이트에서 [지역·상권별 현황] 탭에 대해서 보려고 한다. 이 사이트는 몇개의 조건 검색으로 Json형태로 사이트에서 뿌려주는데 반응도 빠르다. 허나 한번에 하위메뉴를 여는 방법이 없고, 엑셀이나 다른방식으로 데이터를 다운받을 수 없어 이것을 재 가공하기 위해서는 일일이 긁.. 2024. 3. 12.