네이버 파워링크와 블로그 검색결과 엑셀로 정리

제목대로

네이버 파워링크와 블로그 검색결과를 엑셀로 정리해주는 매크로 프로그램입니다.

지식인 질문 링크:

https://kin.naver.com/qna/detail.nhn?d1id=1&dirId=102&docId=307239121&page=1#answer1

1.파워링크 검색:

위와 같은 파워링크 검색 결과를 아래처럼 엑셀 시트에 가져옵니다.

 파워링크는 한페이지가 25개인데 더 있을 경우 제한 검색건수를 입력한 만큼 검색합니다.

파워링크는 블로그와 달리 페이지단위로 마지막 페이지까지 검색합니다.

조회 URL: https://ad.search.naver.com/search.naver?where=ad&query=검색어

검색어는 한글도 검색되도록 URLEncode 했습니다.

2. 블로그 검색: 

블로그 검색결과를 아래 엑셀 시트에 정리해줍니다.

조회 URL: https://search.naver.com/search.naver?dup_remove=1&sm=tab_pge&srchby=all&st=sim&where=post&query=검색어&start=시작번호(10*x+1)

제목에 마우스를 가져가면 설명이 메모로 뜨도록 했습니다.

많은 검색건은 시간이 꽤 걸릴 수 있습니다.

제한 검색건수를 지정하고 검색하는 것을 추천합니다.

엑셀 2010과 2016에서 테스트하였습니다.

시스템에 MSXML 6.0 과 HTML Object Library 가 있어야 합니다.

저의 노하우가 좀 들어 있다고 생각되어 이번 소스에는 암호가 걸려 있습니다.

사용된 라이브러리 개체나 함수들:

MSXML2.XMLHttp

MSHTML.HTMLDocument

MSHTML.IHTMLElementCollection

MSHTML.IHTMLElement

getElementsByClassName

getElementByID

URL인코딩 등

첨부파일을 매크로를 허용하여 열고 테스트해보세요.

*******************최초버전에서 수정 사항********************

- 에러가 나면 다음으로 넘어가도록 수정

- MSXML 6.0 라이브러리를 호환성을 위해 MSXML 라이브러리를 CreateObject 방식으로 불러오도록(LateBinding) 수정

- HTML 라이브러리는 그대로 도구-참조에서 체크하도록 유지(Early Binding)

HTML Object Library의 경우 Late Binding 시 GetElementsBy~함수가 작동하지 않는 이슈가 있습니다.

( window/system32 에 mshtml.*, msxml.* 라이브러리를 이용합니다.)

네이버 인터넷 페이지가 수정되면 오류가 생길 수 있습니다.

수정되더라도 태그상에 class 이름이 유지되면 이상이 없을겁니다.

몇백건 이상 검색시에는 시간이 걸리니 기다리셔야 합니다.

Status Bar에 진행 퍼센트가 나오도록 했습니다.

엑셀매크로파일 Download:

파워링크2.xlsm

*******************최초버전에서 수정 사항(2019.6.3)**********************************

- HTML변경으로 인해 파워링크 총개수 에러로 1개밖에 검색되지 않는 현상 수정, 

- 번호 나오도록 수정

*****************************************************************************************

기간을 제한한 버전을 추가합니다.(매크로 암호 없음)

파워링크2기간.xlsm

G2와 G3에 20190301, 20190308 이런 식으로 날짜를 넣어주면 됩니다.

그리고 st=sim(관련순)이 아니라 st=date 옵션으로 최신순으로 정렬하도록 했습니다.

주의)검색결과의 저작권은 당연히 검색엔진인 네이버와 관련 포스팅작성자들에게 있습니다.

******************************************************************************************

네이버 뉴스검색 버전 

- 기간 제한

- 개수 제한

- 작성자(신문사) 제한

******************************************************************************************

네이버뉴스검색2작성자.xlsm

네이버뉴스검색2기간.xlsm