농산물 도매시장

엑셀 vba/실시간 경락 정보

실시간 경락 정보 #5 데이터 표 만들기

불러온 실시간 경락 정보 데이터를 표로 표시해주는 코드를 추가했습니다. Option Explicit 'B2셀을 기준으로 CurrentRegion범위를 표1로 변경 Sub MakeTable() ActiveSheet.ListObjects.Add(xlSrcRange, Range("B2").CurrentRegion, , xlYes).Name = "표1" End Sub 'ListObject(표)의 서식을 지우고 범위로 변경 Sub ClearTable() Dim Otable As ListObject '// 기존 표를 "범위로 변환" For Each Otable In ActiveSheet.ListObjects Otable.TableStyle = "" Otable.Unlist Next End Sub 데이터를 불러올때 ..

엑셀 vba/실시간 경락 정보

실시간 경락 정보 #2 OpenAPI를 이용한 경락 정보 불러오기

지난 포스팅에서 공공데이터 포털에 가입을 하고 OpenAPI 사용신청까지 했습니다. cookiexcel.tistory.com/29 실시간 경락 정보 #1 오픈 API 신청하기 갑자기 뜬금없긴한데 경락가격 정보를 엑셀에서 바로 쓸수 있으면 좋겠다 싶어 만들어볼 생각입니다. 이후에 발주/매입매출 관리쪽으로 같이 넣어서 사용해도 괜찮을것 같아서 열심히 구글링 cookiexcel.tistory.com 이번 포스팅에서는 신청한 OpenAPI를 이용해 엑셀 시트에 실시간 경락 정보를 불러와 보도록 하겠습니다. 정보를 불러오는 코드는 2가지 방법을 사용해 보겠습니다. 우선 첫번째 방법은 xml로 불러와서 각각의 노드값을 셀로 뿌려주는 방식입니다. Sub CallOpenAPI() Dim strURL As String ..

SweetCookie
'농산물 도매시장' 태그의 글 목록