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

 입살 (ipsal)

추천:  2
파일:     VB0174(VBA로VBA코드작성하기).xls (96.5KB) 조회:  4125
제목:   CodeName 관련 질문입니다
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

1. 엑셀 버전(95,97,2000,2002): 2002
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP): winXP
3. CPU (486,PentiumI/II/III/IV...): P4-1.6G
4. RAM (32,64,128,256,512MB,1G...): 512

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

첨부 파일은 http://www.iexceller.com/ ;에서 가져온것입니다.
exceller님께 질문드렸는데 바쁘신가봐요.
답변이 없으셔서 이곳에 다시 질문올립니다.

질문이 무엇이냐면..
VB0174(VBA로VBA코드작성하기).xls 가 제대로 동작하지 않아서요.
VBE(VBA 편집기)를 열어놓은 상태에서는 정상적으로 동작하는데,
VBE를 닫은 상태에서 실행하면 

'9'런타임 오류가 발생하였습니다.
아래 첨자 사용이 잘못되었습니다.

라는 오류가 계속 발생합니다.

디버그상태로 들어가서 확인하니
   strNewSheet = shtNewSheet.CodeName
부분에 문제가 있습니다.

VBE를 열어놓은 상태에서는 CodeName 값이 읽어지지만
 VBE를 닫은 상태에서는 값을 읽지 못하고 ""값이 할당됩니다.

제 PC만 그런지 확인과 해결책을 부탁드립니다.
제 PC환경은 Windows XP, Excel XP-SP2 입니다.

답변부탁드려요..
 
[불량 게시물 신고]  
황기성간단히...코드의 순서를 조금 바꾸세요

    strNewSheet = shtNewSheet.CodeName
    
    With ThisWorkbook.VBProject.VBComponents(strNewSheet).CodeModule
        intLines = .CountOfLines + 1
        .InsertLines intLines, strCode
    End With

그럼...행운이 있으시길...!
07-18 (10:17)
삭제 ■신고
        
  

작성일 : 2003-07-18(10:12)
최종수정일 : 2003-07-18(10:13)
 


 ◎ 관련글

  제 목   작성자   날짜
CodeName 관련 질문입니다 입살 2003-07-18
[RE]CodeName 관련 추가 질문입니다 입살 2003-07-18
[RE]CodeName 관련 추가 질문입니다 황기성 2003-07-18