안녕하세요. 네이버 뉴스에서 검색해서 결과를 가져오는 VBA 코드입니다. 완성 파일 다운로드 '검색'은 URL을 C열에 나타내고, '검색2'는 A열에 링크를 걸어 나타냅니다. '초기화'는 검색 결과를 모두 지웁니다. Public Sub 초기화() Range("5:1048576").Clear End Sub Public Sub 검색() r = 5 키워드 = Range("A2").Value For Page = 1 To 10 Start = (Page - 1) * 10 + 1 Set doc = GetDocumentByUrl("https://search.naver.com/search.naver?where=news&sm=tab_jum&query=" & 키워드 & "&start=" & Start) For i = 0 T..
