윤자동3 [VBA] 만능폴더 만들기 https://www.youtube.com/watch?v=FYMDU3dvuoY 같은 오픈채팅방 크루인 다잡님이 올려주신 유튜브 내용을 일부 착안해서 작성하였다. 지금 한시적으로 무료로 이파일을 드린다고 하니 관심 있는 분들은 회원가입후 소장하시길 바란다. 정말 배울게 많은 분이다. 본인의 크롤링 스킬의 기본 뼈대를 완성해 주신 분이라서 더욱 이글을 읽는 분들께 알려드리고 싶다. 윤자동님 코드를 보지는 못했지만 최대한 비슷한 느낌으로 만들어 보려고 했다. 코드의 구성은 심플하다. 폴더 유무를 파악해서 있으면 다음을..없으면 생성하는... 조금 까다로운건 부서폴더를 보면 같은부서는 빈셀로 되어 있어서 이부분을 처리하는 코드가 있어야 한다. 빈셀인 부분은 빈셀이 아닌 부서명을 가져오게 된다. 해당셀.end(3.. 2023. 4. 18. [심화방] VBA_심화_100제 #5 [ Sk엔카 크롤링 ] https://www.youtube.com/watch?v=FkMC743suho 윤자동 ... 다잡님 채널에서 공개된 엔카 중고차 매물에 관한 셀레니움 과제이다. 다잡님 강의에서 Html 파싱을 위해 분석하는 법까지 공개하였으니 , 참고하여 보시길 바란다. 네이버뉴스에서처럼 이미지를 가져오려면 페이지가 모두 로딩이 되어야 이벤트가 발생하여 가져올 수 있기 때문에 매물정보는 다음페이지가 아닌 한 페이지 매물만 가져오는 코드이다. 너~~무 느려 저번에도 공개하였듯이 스크롤을 움직이는 자바스크립트 구문은 이렇다... Sel.ExecuteScript ("window.scrollTo(0, 2100);") 보통 2100이라는 숫자는 화면 높이로서 보통 99999 이렇게 무한에 가까운값을 넣어 한방에 내리는데 sk엔카.. 2023. 1. 6. [VBA] 코스피 200 가져오기(네이버 증권, Callbyname) 코스피 200을 가져오는 코드를 Jsonconver 없이 만들어 보았다. 단점은 엑셀 64비트를 사용하시는 분들은 초기에 설치파일을 본인 컴에 설치하신 후 사용하셔야 한다. 설치는 압축을 풀고 EXE 파일을 눌러서 설치하면 된다. 더보기 Option Explicit Sub get_kospi200() Ref.xmlhtml '= xmlHttp 초기 바인딩 참조 'Stop Dim strUrl As String: strUrl = "https://m.stock.naver.com/api/json/sise/enrollItemListJson.nhn?pageSize=202" '= 네이버증권 코스피 200 Dim xmlhttp As New ServerXMLHTTP60 '= xmlHttp 초기 바인딩 Dim rngX As .. 2022. 6. 27. 이전 1 다음
