예를 들어,
Excel 스프레드시트의 A2 셀에 이 품목의 가장 저렴한 가격을 표시하려면 이를 위해 작성할 수 있는 코드가 있습니까? 이는 지속적으로 데이터를 긁어내는 것이 아닙니다. 하루에 한 번씩 가격을 찾을 수도 있습니다.
http://steamcommunity.com/market/listings/440/Strange%20Hillbilly%20Speed-Bump
답변1
다음은 기본적인 예입니다. 웹사이트를 HTML 코드로 표시하는 방법을 보여줍니다. 거기서부터 텍스트로 변환한 페이지의 내용을 어떻게 읽을지 결정해야 하지만 최소한 시작은 다음과 같습니다.
Private Sub GetWebsiteHtml_Click()
Dim x As Long, y As Long
Dim htmlText As Object
Set htmlText = CreateObject("htmlFile")
With CreateObject("msxml2.xmlhttp")
.Open "GET", "http://google.com", False
.send
htmlText.body.innerHTML = .responsetext
End With
End Sub
htmlText는 웹사이트를 포함하는 변수가 됩니다. 나는 예시로 구글을 사용했다.