1. FAQ
  2. 엑셀(Excel)
  3. AfterEffects
  4. Premiere
  5. Photoshop
  6. ETC

엑셀에 대해서 궁금한 것이 있으시면 마음껏 질문해주세요.

이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.

글 수 822

엑셀 웹 쿼리 질문드립니다.

조회 수 6065 추천 수 0 2009.12.16 10:18:05
[레벨:1]페니 *.130.73.75

웹쿼리는 할 줄 아는데...

 

문제가...

 

http://www.kofiabond.or.kr/SGPG/SGPG_mtrs_1.asp?comp=KIS&start_date=20091215&gosi=mean

 

여기서 start_date를 항상 오늘날짜

 

예를들어 12월 16일엔 20091216으로 해서 긁어와야 하구요

 

그 다음날엔 20091217로 긁어 와야 하는데...

 

방법이 있을 거 같은데...

 

궁금합니다.

 

답변 좀^^

 

즐건 하루 되세요

이 게시물을...
엮인글 :
http://abyul.com/zbxe/71954/2c6/trackback
목록

댓글 '6'

profile

[레벨:30]아별

2009.12.16 15:57:27
*.75.228.207

웝쿼리를 던질때, URL에 "http://ww...어쩌구&start_date=" & format(Date,"yyyymmdd") & "나머지주소" 라는 식으로 하시면 될 겁니다.

Date는 오늘 날짜를 의미합니다.

 

참고로, 제 홈페이지에서 "쿼리"로 검색해보면, 아래의 게시물을 찾을 수 있을겁니다.

아래 게시물을 참고해보세요.

http://www.abyul.com/zbxe/15301

[레벨:1]페니

2009.12.16 17:14:22
*.255.207.104

감사합니다^^

아별님... 혹시 어제 날짜를 하려면 어떻게 해야 하나요??

date-1 하니까 안되던데요. 문의드립니다^^

그냥 -1하면 하긴... 1일에서 30일이나 31일로 자동으로 갈 수 있는지도 모르겠네요

답변 좀 부탁드립니다.

 

그리고 정말 감사합니다

profile

[레벨:30]아별

2009.12.16 17:21:07
*.75.228.246

DateAdd() 함수를 사용하면 됩니다.

Format(DateAdd("D", -1, Date), "yyyymmdd")

 

그리고.. 별 말씀을요.. ^-^;

 

아참.. 참고로..

오늘을 의미하는 Date 대신에 아래와 같은 것도 활용할 일이 있을지 모르겠네요.

전월 말일 : DateSerial(Year(Date), Month(Date), 0)

당월 말일 : DateSerial(Year(Date), Month(Date) + 1, 0)

 

도움이 되셨기를..

[레벨:1]페니

2009.12.16 18:02:36
*.255.207.104

http://www.kofiabond.or.kr/SGPG/SGPG_mtrs_1.asp?start_date=format(DateAdd("D", -1, Date), "yyyymmdd")

새 웹커리에서 주소에다 위에 거 입력하면 되는거죠??

근데 이상한 결과가 나오네요 ㅠㅠ

조회일에 format(DateAdd(가 들어가버리네요 ㅠㅠ

 

http://www.kofiabond.or.kr/SGPG/SGPG_mtrs_1.asp?start_date=20091215

같은 결과가 나와야 하는데 말입니다.

 

죄송하지만 확인 좀 부탁드리면 안될까요

 

이거 해결하고 나면 엑셀하고 VBA 공부 좀 해야겠네요^^

정말 감사합니다

profile

[레벨:30]아별

2009.12.16 18:19:41
*.75.228.207

아래 코드를 사용해보세요.

Excel 2003, 2007, 2010 모두에서 테스트해본 결과 모두 잘 돌아갑니다.

 

 Sub webQueryKofiabond()
    Dim strURL As String
    Dim strTargetDate As String
   
    strTargetDate = Format(DateAdd("D", -1, Date), "yyyymmdd")
   
    strURL = "URL;http://www.kofiabond.or.kr/SGPG/SGPG_mtrs_1.asp?start_date="
    strURL = strURL & strTargetDate
   
    With ActiveSheet.QueryTables.Add(Connection:=strURL, Destination:=Range("A1"))
        .Name = "SGPG_mtrs_1.asp?start_date=" & strTargetDate
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlSpecifiedTables
        .WebFormatting = xlWebFormattingNone
        .WebTables = """tDownload"""
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .Refresh BackgroundQuery:=False
    End With
End Sub

[레벨:1]페니

2009.12.16 18:52:12
*.255.207.104

정말 감사합니다

잘 되네요^^

문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 공지 [공지] 아별닷컴의 엑셀 질문방 폐쇄합니다. 카페 질문방 이용하세요.. imagefile [레벨:30]아별 2015-04-23 58959
822 VBA 도움을 요청드립니다~ secret [레벨:1]비베초보 2014-07-29 1
821 엑셀일반 통합문서공유풀기 secret [레벨:1]couplecoco 2014-07-29 1
820 피벗테이블 피벗테이블을 이용한 판매일보 관리 secret [레벨:1]삽질대마왕 2014-11-04 2
819 추가기능(AddIns) 비용 배부 후 집계 엑셀 프로그램을 만들고싶습니다. secret [1] [레벨:1]노스트윈즈 2013-06-27 3
818 아별툴관련질문 아별님 나카타입니다^^ secretimage [레벨:4]나카타 2013-01-10 4
817 피벗테이블 피벗테이블 계산 필드 계산문제ㅠㅠ secret [2] [레벨:4]thoi 2013-07-08 4
816 엑셀일반 아별툴 질문 secret [3] [레벨:1]ㅂㅂㅂㅂㅂ 2014-01-13 4
815 SUMIF 엑셀 문의드립니다. (엑셀2013) secret [레벨:1]pongpong 2014-11-10 4
814 엑셀수식 index 수식을 사용한 열들에서 행별 counta 사용하기 secret [2] [레벨:4]성투은자 2014-11-17 4
813 엑셀일반 셀내용 나누기 궁금합니다. secret [레벨:1]남달춘 2021-06-26 4
812 엑셀수식 데이터를 뽑고싶습니다. secret [3] [레벨:1]아코아잌 2013-08-17 6
811 기타 엑셀 문의 드립니다. secret [2] [레벨:0]대성 2015-02-06 6
810 pivot 기본 질문 드려요 secret [2] [레벨:4]thoi 2013-04-30 8
809 엑셀수식 엑셀 수식 질문드립니다._ 2가지 조건을 만족하는 값 찾기(VLOOKUP, MATCH) secret [3] [레벨:0]대성 2015-02-26 8
808 엑셀일반 아별님 도와주세요 ㅜㅜ secret [3] [레벨:2]조기리 2013-05-24 10
807 VBA 데이터 유효성 질문.. 리스트에서 항목 선택하면 기존 항목에 더해져서 표시되게 하기 secretimage [1] [레벨:1]미소가인 2012-12-22 43
806 엑셀일반 안녕하세요 아별님~ [1] [레벨:4]나카타 2012-09-27 1872
805 엑셀일반 안녕하세요^^야별님.. file [2] [레벨:2]북곰 2012-09-16 1874
804 엑셀수식 시작점 지정에 관한 질문입니다. file [1] [레벨:1]bugi87 2012-08-03 1880
803 날짜/시간 수식 수식연동 좀 해 주셔요 file [6] [레벨:0]아민 2012-09-22 1909
목록
쓰기