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

작성자:  

 안성진 (tjdwls972)

추천:  2
파일:     조회:  2504
제목:   엑셀 vba 특정 명령어 오류
     
  * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

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

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

안녕하세요

제가 DTPicker라는 날짜 엑티브 X 컨트롤러를 사용하는데
그것의 디폴트값을 항상 오늘 날짜로 설정하려고합니다.

Private Sub UserForm_Initialize()

DT_date.Value = Date

End Sub
그래서 위와 같이했더니

컴파일 오류가 뜨면서 프로젝트나 라이브러리를 찾을 수  없다고 뜹니다.

다른 파일에서 똑깥이 썻던 코드인데 지금 파일에서는 이렇게 오류가 납니다 
또 format 함수 또한 똑같은 오류가납니다.

sht_input.Range("I" & i + 8).Value =  format(sht_st.Range("H" & i).Value, "0000")

무조건 4자리 수고 빈자리 값은 0으로 채우게 하는건데 이 역시 다른 파일에서 잘 썻던 코드인데 지금 파일에서는 프로젝트나 라이브러리가 없다고 뜹니다.  뭐가 누락된건지.. 시트 보호 설정도 안해놨는데...
혹시 아시는분 있으신가요???
 
[불량 게시물 신고]  
조삿갓그 사용자정의 폼에 DT_date 라는 이름을 가진 콘트롤(레이블, 텍스트박스 등)이 있나요? 아마 없을 겁니다.
다른 파일에는 그런 이름의 콘트롤이 있었을 거고요.
날짜를 표시하고 싶은 콘트롤의 이름을 좌변에 써 주어야 합니다.

두번째 경우도 마찬가지로 format 함수에서 오류가 난 게 아니고 sht_input 또는 sht_st 라는 Variant 변수에 대상 워크시트 개체를 할당해 주어야 합니다. 예를들면
Set sht_input = Sheets("입력")
이런 식의 명령어가 선행되어야 합니다.
05-04 (14:29)
삭제 ■신고
        
  

작성일 : 2018-05-04(11:02)
최종수정일 : 2018-05-04(11:02)