Открыть календарь, на фиксированную дату

[segail]

Я заметил, что дополнительные условия и годы кнопок открытия календаря, не дают корректно выполнить открытия календаря с фиксированной или текущей датой.
Убрал все условия и коды, оставил только “Условия” и коды выбора даты при открытии, коды кнопок открытия календаря начали работать корректно. Что значит дополнительные коды и условия на кнопках не дают корректно выбрать дату при открытие?

[doober]

Private Sub UserForm_Initialize()
    Form_DateTime_Showed = True
    Me.chb_Time.Value = False    ' по умолчанию время не используем
    Me.Frame_time.Visible = False

' здесь любые ваши условия

SelectedDate="11.11.2011"

SelectedDate=Now

SelectedDate=Range("A1")

    If IsDate(SelectedDate) Then
        dt_1 = CDate(SelectedDate)
    Else
        If IsDate(DefaultDate) Then dt_1 = CDate(DefaultDate) Else dt_1 = Now
    End If
    dt_2 = dt_1

[segail]

Я уже так делал

    Form_DateTime_Showed = True
    Me.chb_Time.Value = False    ' по умолчанию время не используем
    Me.Frame_time.Visible = False
    
    If Условие = 4 Then SelectedDate = DateSerial(Sheets("Отчет").[R1], 1, 1) 'Фиксированная дата
    If Условие = 1 Or Условие = 2 Or Условие = 3 Then SelectedDate = Now 'Текущая дата
    
    'Сохранение исходной даты при отказе выбора
    If IsDate(SelectedDate) Then
        dt_1 = CDate(SelectedDate)
    Else
        If IsDate(DefaultDate) Then dt_1 = CDate(DefaultDate) Else dt_1 = Now
    End If
    dt_2 = dt_1

И опять повторюсь

В смысле я открываю календарь с “Фиксированной датой”
Затем в календаре я выполняю нужный код кликом по кнопке Cmd_Select_Click или произвожу отмену кликом по кнопке Cmd_Cancel_Click, форма календаря закрывается, на этом все.
Затем я открываю календарь другой кнопкой, где открытие должно происходить с “Текущей датой”, но открытие календаря происходит с “Фиксированной датой”, приходится закрыть календарь, или самому установить текущую дату, только при повторном открытие календаря той же кнопкой (например кнопкой приход) дата становится текущей. И наоборот (все что описал ваше), если изначально календарь был открыт с “Текущей датой”.

[doober]

Если и это не то,тогда не знаю

[segail]

Создал пример, на кнопки открытия календаря для теста повесил различные коды и условия.
Откройте файл нажмите кнопку текущей даты, затем закройте календарь кнопкой ОК или ОТМЕНА, после этого откройте календарь кнопкой фиксированная дата.
Короче посмотрите не корректность выбора даты при открытии календаря и работы кодов.

[doober]

А если так

[segail]

Сообщение от doober

А если так

Да работает, то что и надо было. Но для меня есть одно НО
Вы применили глобальные переменные V_T и Select_Width
В моем примере условия и коды кнопок тестовые, не несут ни какой логики.
В проекте у меня будет пять кнопок открытие календаря, с различными условиями и кодами.
Как лоббировать этими переменами, что бы избежать не корректности выбора даты при открытии календаря, для меня пока не ясно…

[doober]

Как лоббировать этими переменами

Такие слова капиталистические.
я методом тыка определил-лучше не менять свойства контролов вне формы.Тогда сбоев нет.Чего пугают глобальные переменные.Вы только помните о них,их состоянии(значении).
А когда переменных штук 30,и ничего

[segail]

Сообщение от doober

Такие слова капиталистические.
я методом тыка определил-лучше не менять свойства контролов вне формы.Тогда сбоев нет.Чего пугают глобальные переменные.Вы только помните о них,их состоянии(значении).
А когда переменных штук 30,и ничего

В основном Вы используете глобальные переменные, при изменении свойств объектов связанных с формой календаря?

[doober]

Я календарик стараюсь использовать по прямому предназначению.
Сделайте несколько копий .например,и для каждого случая вызывайте свой.Так хоть не запутаетесь.