VBA 사용자 양식에 날짜 선택기를 추가하는 방법

VBA 사용자 양식에 날짜 선택기를 추가하는 방법

사용자가 날짜를 선택할 수 있도록 userForm에 추가할 컨트롤을 찾고 있습니다.이 주소에서 좋은 주소를 찾았습니다.

VBA의 텍스트 상자에서 MM/DD/YYYY 날짜 형식 지정

완벽하지만 내 애플리케이션에 필요하지 않은 보이지 않는 시트를 생성하는 Siddharth Rout에서.시트 작성을 중단하려고 했지만 해결할 수 없었습니다.

어떻게 하면 싯다스 루트 코드를 제대로 수정할 수 있는지, 아니면 다른 애플리케이션을 알려줄 수 있는지 알려주실 수 있나요?

시간 내주셔서 감사합니다.

Office 2013 지침:

(Windows 7(x64) | MS Office 32비트용)

옵션 1 | 능력이 이미 존재하는지 확인 | 2분

1. VB 편집기 열기
2. 도구 -> 추가 컨트롤
3. "Microsoft Monthview Control 6.0(SP6)"을 선택합니다(해당하는 경우).
4. VBA 사용자 양식에 '날짜 선택기' 컨트롤 사용

옵션 2 | "Monthview" 컨트롤은 현재 존재하지 않습니다 | 5분

1. Excel 닫기
2. MSCOMCT2.cab 다운로드(유용한 두 개의 파일로 압축을 푸는 캐비닛 파일입니다.
3. 두 파일 모두 추출 | .inf 파일과 .ocx 파일
4. 설치 | .inf 파일을 마우스 오른쪽 단추로 클릭 | "설치"를 누릅니다.
5. .ocx 파일 이동 | "C:"에서 이동합니다.\Windows\system32"에서 "C:\Windows\sysWOW64"
6. CMD 실행 | 시작 메뉴 -> 검색 -> "CMD.exe" | 아이콘 우클릭 | "관리자 권한으로 실행" 선택
7. Active-X 파일 등록 | "regsvr32 c:\windows\sys"를 입력합니다.WOW64\MSCOMCT2.ocx"
8. Excel 열기 | VB 편집기 열기
9. 컨트롤 활성화 | 도구 ->참조 | "Microsoft Windows Common Controls 2-6.0(SP6)"을 선택합니다.
10. 사용자 양식 컨트롤 | VB 프로젝트에서 원하는 사용자 양식 선택 | 도구->추가 컨트롤
11. "Microsoft Monthview Control 6.0(SP6)"을 선택합니다.
12. VBA 사용자 양식에 '날짜 선택기' 컨트롤 사용

Windows 7(x64)에서 Office 2013(32비트)을 사용하는 경우 이 두 단계 중 하나가 효과적입니다.Windows 7(윈도우 7)과 Office 2013(오피스 2013)의 조합이 다른 경우 일부 단계가 다를 수 있습니다.

"Monthview" 컨트롤은 완전히 확장된 "DatePicker"가 됩니다.그것은 고유의 특성과 이미지를 갖추고 있습니다.아주 잘 작동합니다.행운을 빌어요.

사이트: 위의 "bonCodigo" (이것은 그의 작품의 업데이트된 확장입니다)
사이트: 위의 "AMM" (이것은 그의 추가의 확장일 뿐입니다)
지원 웹 : Microsoft 지원 웹 페이지

Microsoft 날짜 및 시간 선택기 컨트롤을 사용해 볼 수 있습니다.사용하려면 도구 상자에서 마우스 오른쪽 단추를 누른 후 "추가 컨트롤..."을 선택합니다.그런 다음 "Microsoft 날짜 및 시간 선택기 컨트롤 6.0"을 선택하고 확인을 선택합니다.도구 상자에 필요한 작업을 수행할 수 있는 새 컨트롤이 있습니다.

저는 방금 http://www.logicwurks.com/CodeExamplePages/EDatePickerControl.html 에서 이것의 인쇄 화면을 발견했습니다. 절차는 잊어버리고 인쇄 화면만 확인하세요.

2013년 액세스.텍스트 상자 컨트롤을 양식에 놓습니다.[형식] 탭 아래 컨트롤의 속성 시트에서 [형식] 속성을 찾습니다.날짜 형식 옵션 중 하나로 설정합니다.일은 끝났어요.

이 컨트롤과 관련된 몇 가지 문제에 대해 설명해 주십시오.

달력 보기는 사무실 패키지와 함께 제공되는 표준 컨트롤이 아닙니다.따라서 개발자들은 일부 다른 Machiens/버전의 사무실에서 애플리케이션을 배포할 때 달력 보기 컨트롤이 누락되는 등의 문제에 직면했습니다.이를 사용하려면 .dll, .ocx 파일에 대한 참조를 활성화해야 합니다.

달력 보기가 누락된 경우 System 또는 System32 디렉토리에서 MSCOMCT2.OCX 파일을 교체하고 올바르게 등록해야 합니다.파일을 제대로 교체하려면 이 링크를 사용하십시오.

VBA 편집기 메뉴 모음 -> 도구 -> 참조를 선택한 다음 달력 보기 참조를 찾아 확인합니다.

파일이 필요하면 여기에서 MSCOMCT2.OCX를 다운로드합니다.

달력 보기 대신 일정관리 양식을 사용할 수 있습니다.사용자 양식 예제에서 이 일정관리 양식을 사용하여 텍스트 상자에 날짜를 추가했습니다.텍스트 상자를 두 번 클릭하면 캘린더 양식이 표시됩니다.

Private Sub txtDOTDate_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Call GetCalendar
End Sub

Sub GetCalendar()
    dateVariable = CalendarForm.GetDate(DateFontSize:=11, _
        BackgroundColor:=RGB(242, 248, 238), _
        HeaderColor:=RGB(84, 130, 53), _
        HeaderFontColor:=RGB(255, 255, 255), _
        SubHeaderColor:=RGB(226, 239, 218), _
        SubHeaderFontColor:=RGB(55, 86, 35), _
        DateColor:=RGB(242, 248, 238), _
        DateFontColor:=RGB(55, 86, 35), _
        TrailingMonthFontColor:=RGB(106, 163, 67), _
        DateHoverColor:=RGB(198, 224, 180), _
        DateSelectedColor:=RGB(169, 208, 142), _
        TodayFontColor:=RGB(255, 0, 0))
If dateVariable <> 0 Then frmflightstats.txtDOTDate = dateVariable
End Sub

템플릿 원본

언급URL : https://stackoverflow.com/questions/13409653/how-to-add-date-picker-to-vba-userform