나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 써니 (ischoe)

추천:  2
파일:     조회:  1396
제목:   런타임 오류 질문
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

 - 엑셀 버전(95,97,2000,xp,2003,2007): 2016

* 아래줄에 질문을 작성하세요 >>

Sub Test()

Dim IE As Object
Dim vals As Variant


Sheets("Sheet1").Range("A1:A1000") = "" ' erase previous data


Set IE = CreateObject("InternetExplorer.Application")
With IE
.Navigate "http://www.daum.net" ' should work for any URL
Do Until .ReadyState = 4: DoEvents: Loop
End With

IE.ExecWB 17, 0 '// SelectAll
IE.ExecWB 12, 2 '// Copy selection

Sheets("Sheet1").Cells(1, 1).PasteSpecial Paste:=7

IE.Quit

End Sub


질문 : PasteSpecial 항에서 런타임 오류 발생하는데 구글링에도 답을 찾지 못하겠어요.. 고수님 한번 봐주시고 제 고민 좀 해결해주세요~~
 
[불량 게시물 신고]  
        
  

작성일 : 2020-07-23(11:29)
최종수정일 : 2020-07-23(11:29)