달력 유저폼 오류

VBA
작성자
새우튀김
작성일
2021-04-04 16:53
조회
53

재고관리 강의 때 오빠두님이 공유해주신 달력 유저폼을 아주 유용하게 사용하고 있는데용

 

엊그제 부터인가 어느순간 부터 유저폼을 실행하면 당월이 뜨던 달력이 전부다 00으로만 뜨고 작동을 안하더라구요

제가 코드를 건드린 것두 없구용, 혹시나 싶어 노트북, 컴퓨터, 컴퓨터2등 다른 기기에서 작동시켜 봤는데 전부 동일하게 날짜가 안뜨더라구용 저만 그런가용??

회원등급 : 열매4단계
포인트 : 1857 EP
총질문 : 29 개 (마감율 : 34%)
채택답변 : 3 개
전체 1

  • 2021-04-04 21:46
    채택된 답변

    안녕하세요.

    최초 실행될 때 명령문이 잘못 작성되어 있었습니다.

    Private Sub UserForm_Initialize()

    명령문 중간에 resetYear 함수가 있습니다. resetYear뒤에 resetDate 함수를 추가해보시겠어요?

    전체 명령문을 아래로 변경해보세요.

    잘못된 부분 확인해주셔서 감사드립니다.

    Private Sub UserForm_Initialize()
    
    Dim i As Long
    
    For i = 1 To 42
        With Me.Controls("Label" & i)
            .BackStyle = 0
        End With
    Next
    
    For i = 43 To 84
        With Me.Controls("Label" & i)
            .Caption = ""
            .top = .top - 2
            .left = .left - 2
            .Width = .Width + 3
            .Height = .Height + 2
            .BackStyle = 1
            .Font.Bold = True
        End With
    Next
    
    With Me.cboMonth
        For i = 1 To 12: .AddItem i & "월": Next
    End With
    
    ReDim vLists(0 To 41)
    For i = 0 To 41
        vLists(i) = "Label" & i + 43
    Next
    
    resetYear
    'resetDate 함수를 추가해주세요.
    resetDate
    
    Me.lblYear.Caption = Year(Date) & "년"
    Me.lblMonth.Caption = Month(Date) & "월"
    Me.scrlMonth.Value = Month(Date)
    
    End Sub

전체 2,821
번호 카테고리 제목 작성자 작성일 추천 조회
2810 함수/공식
New 코드가 달라지는 경우 sumif로 끌어오는 방법이 있을까요? 첨부파일
루치카 | 2021.04.21 | 추천 0 | 조회 7
루치카 2021.04.21 0 7
2809 파워쿼리/피벗
New 이전 버젼 웹쿼리 이용
하이게인 | 2021.04.21 | 추천 0 | 조회 6
하이게인 2021.04.21 0 6
2808 함수/공식
New 재고정리 관련 여러가지 조건 만족하는 데이터 찾기 첨부파일
뜨남 | 2021.04.21 | 추천 0 | 조회 9
뜨남 2021.04.21 0 9
2807 함수/공식
New sumif 함수 사용할 때 인접 범위(병합된 셀)가 동시에 선택됩니다 첨부파일 (4) 답변완료
엑셀맛스타 | 2021.04.21 | 추천 0 | 조회 29
엑셀맛스타 2021.04.21 0 29
2806 함수/공식
New 대소문자 구분하여 매칭에 날짜 비교조건 넣는 방법
고래킹 | 2021.04.21 | 추천 0 | 조회 18
고래킹 2021.04.21 0 18
2805 기능/도구
New 텍스트 변환 문제가 있어서 질문드립니다. 첨부파일 (1)
존네프 | 2021.04.21 | 추천 1 | 조회 20
존네프 2021.04.21 1 20
2804 차트/그래프
New 간트차트 상 해당일 표시 관련 문의드려요 (1)
asuka | 2021.04.21 | 추천 0 | 조회 28
asuka 2021.04.21 0 28
2803 함수/공식
New 한셀 동적범위에 대해서 질문드립니다~! (1)
비비바비부 | 2021.04.20 | 추천 0 | 조회 28
비비바비부 2021.04.20 0 28
2802 함수/공식
New 도와주세요......"조건이 맞으면 특정행에서 값을 찾아서 일치한값을 돌려주는 함수" 첨부파일 (2) 답변완료
몽골리용 | 2021.04.20 | 추천 0 | 조회 51
몽골리용 2021.04.20 0 51
2801 VBA
New 답변이 부정확한 것 같습니다. 첨부파일 (3)
나는나 | 2021.04.20 | 추천 0 | 조회 62
나는나 2021.04.20 0 62
2800 VBA
New 속도개선 구문 사용시 자동계산 문제 (7)
나는나 | 2021.04.20 | 추천 0 | 조회 40
나는나 2021.04.20 0 40
2799 VBA
New 크롤링 시 브라우저 확인창 닫기 (4)
나는나 | 2021.04.20 | 추천 0 | 조회 32
나는나 2021.04.20 0 32
2798 VBA
New vba로 지도 컨트롤하는법 (6)
기해 | 2021.04.20 | 추천 1 | 조회 51
기해 2021.04.20 1 51
2797 차트/그래프
New 원형그래프 문제 해결 방법 부탁합니다 첨부파일 (5)
그만투덜대 | 2021.04.20 | 추천 0 | 조회 37
그만투덜대 2021.04.20 0 37
2796 차트/그래프
New 안녕하세요 원형 그래프 관련 질문입니다 첨부파일
그만투덜대 | 2021.04.20 | 추천 0 | 조회 23
그만투덜대 2021.04.20 0 23
2795 문서서식
New 엑셀 찾기 질문있습니다. 첨부파일 (3) 답변완료
yhc**** | 2021.04.20 | 추천 0 | 조회 46
yhc**** 2021.04.20 0 46
2794 함수/공식
New 구글 시트+엑셀 관련 질문을 올려도 될까요? 첨부파일 (1)
Minhong Kim | 2021.04.20 | 추천 0 | 조회 31
Minhong Kim 2021.04.20 0 31
2793 VBA
New 셀 바이트에 따라 글자 자르기 (4) 답변완료
ArkGie | 2021.04.19 | 추천 0 | 조회 35
ArkGie 2021.04.19 0 35
2792 VBA
New vba에서 inputbox로 범위를 선택하기 첨부파일 (2)
nowon72 | 2021.04.19 | 추천 0 | 조회 22
nowon72 2021.04.19 0 22
2791 함수/공식
New 여러 쇼핑몰의 판매를 합산하려는데 함수를 모르겠습니다 첨부파일 (4) 답변완료
루치카 | 2021.04.19 | 추천 1 | 조회 51
루치카 2021.04.19 1 51
2790 함수/공식
New 다중유효성으로 조건 별 선택 시, 동적범위가 설정되어 합계를 구하고 싶습니다. 첨부파일
mo**** | 2021.04.19 | 추천 1 | 조회 32
mo**** 2021.04.19 1 32
2789 대시보드
New 월별 매출 실적 대시보드 해결방법 첨부파일 (1) 답변완료
우리우리누리 | 2021.04.19 | 추천 0 | 조회 54
우리우리누리 2021.04.19 0 54
2788 함수/공식
New 다수의 함수 사용으로 인한 속도저하 문제시 단계검토 문의 (1)
소금인형 | 2021.04.19 | 추천 0 | 조회 28
소금인형 2021.04.19 0 28
2787 함수/공식
New 다른 시트 정보 불러오고, 표는 늘리고 줄이고 하는 방법 있을까요? 첨부파일 (1)
정미니 | 2021.04.19 | 추천 0 | 조회 42
정미니 2021.04.19 0 42
2786 기능/도구
필터 조건값 표시 관련 (2)
이생망 | 2021.04.18 | 추천 0 | 조회 58
이생망 2021.04.18 0 58
2785 VBA
1000개의 입력값이 셀당 일치값이 있는지 확인 검색시 FOR문은 느려서 빠른방법이 있을까요? (5) 답변완료
뻥쟁이 | 2021.04.18 | 추천 0 | 조회 49
뻥쟁이 2021.04.18 0 49
2784 VBA
VBA로 SQL 형식의 관계형 데이터베이스 구축 (2)
루카스 | 2021.04.17 | 추천 0 | 조회 55
루카스 2021.04.17 0 55
2783 함수/공식
엑셀 버튼(?)만들기 관련 질문드려요! (3) 답변완료
Philiip Rho | 2021.04.17 | 추천 1 | 조회 79
Philiip Rho 2021.04.17 1 79
2782 기능/도구
이중유효성목록상자의 콤보박스 활용 관련 질문입니다. (1)
Butterfly | 2021.04.17 | 추천 1 | 조회 33
Butterfly 2021.04.17 1 33
2781 함수/공식
텍스트 나누기 (4)
정기🎵 | 2021.04.17 | 추천 1 | 조회 59
정기🎵 2021.04.17 1 59