Страница 3 из 3
Re: подключить ActiveX, например Календарь
Добавлено: 16 июл 2008, 21:18
VictorM
Avsha, понял! Вот теперь понял Вашу идею.
Re: подключить ActiveX, например Календарь
Добавлено: 21 июл 2008, 17:32
DzenDen1
VictorM,
Можете подсказать, как прикрутить календарь к
userform1.textbox2
userform1.textbox20
userform1.textbox22
что-бы календарем вводить разные даты в форме, и чет-то у меня с
форматом не получается,заранее благодарен.
Re: подключить ActiveX, например Календарь
Добавлено: 22 июл 2008, 00:34
VictorM
Посмотрите вложение
Re: подключить ActiveX, например Календарь
Добавлено: 22 июл 2008, 01:06
Aent
Кстати, ViktorM, по поводу подобной парольной защиты.
Когда ваш макрос запрашивает пароль с помощью InputBox нажмите Ctrl+Break
Re: подключить ActiveX, например Календарь
Добавлено: 22 июл 2008, 01:30
VictorM
Спасибо, но это не моя защита
Это защита автора файла
DzenDen1
Re: подключить ActiveX, например Календарь
Добавлено: 22 июл 2008, 06:00
Mint86
Господа, а никому не встречался календарь наподобие календаря от Avsha но на 12 месяцев (чтобы сразу же были видны все месяца)? Или может ActiveX какой нить есть.
Re: подключить ActiveX, например Календарь
Добавлено: 22 июл 2008, 12:12
DzenDen1
VictorM, Вам большой сенкс.
" писал(а):Когда ваш макрос запрашивает пароль с помощью InputBox нажмите Ctrl+Break
Да нармуль защита,Ctrl+Break а там password... дальше дело техники.
Re: подключить ActiveX, например Календарь
Добавлено: 05 сен 2009, 10:54
segres
Здравствуйте.
Подскажите пожалуйста.
У меня код, который вводит данные или удаляет на выбранную дату, находится в кнопке Cmd_Select
Как после выполнение команды закончить выбор даты и закрыть форму календаря,
Код: Выделить всё
Private Sub Cmd_Select_Click()
'Команда - закончить выбор даты и закрыть форму
SelectedDate = CStr(DateValue(dt_1))
Unload Me
End Sub
выполнить код по отношению к той кнопки, которой был открыт календарь.
Код: Выделить всё
Private Sub CommandButton6_Click()
Get_Date (Now) 'Открыть календарь
End Sub
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Дополнение
Проще говоря, кнопка ОК будет одна выполнять различные коды по отношению к кнопкам которыми был открыт календарь.
p/s
Чтобы не вписывать код в кнопку ОК
Кнопка ОК должна выполняеть только выбор даты и закрытие формы
Код: Выделить всё
Private Sub Cmd_Select_Click()
'Команда - закончить выбор даты и закрыть форму
SelectedDate = CStr(DateValue(dt_1))
Unload Me
End Sub
Re: подключить ActiveX, например Календарь
Добавлено: 24 фев 2010, 14:02
novak_26
VictorM писал(а):определимся:
1. При активации ячейки в столбце (определенном) появляется календарь.
2. После выбора значения в календаре, это значение попадает в активную ячейку.
так?
Посмотрите вложение. Основа - немного переделанный по себя календарь Avsha. Активируете яч. в столбце D, щелчком по дате на календаре выбираете нужное Вам значение, оно попадает в активную ячейку. Вообщем - разберетесь.
А можно что-то подобное, только чтобы дней не было? Просто месяцы и годы (мне для задач прогнозирования на N лет вперед)). И чтобы записывалось не в любую выбранную ячейку, а в конкретную (а лучше во внутреннюю переменную макроса). Нажимаешь кнопку, открывается форма, там два поля "месяц", "год".
Я с алгоритмическими операторами vba немного разобрался, с объектными пока туго, их больше рекордером пишу.
Re: подключить ActiveX, например Календарь
Добавлено: 12 ноя 2015, 10:08
Dost1369
VictorM писал(а):2. После выбора значения в календаре, это значение попадает в активную ячейку.
так?
Очень интересует вот этот момент.
Подскажите, пожалуйста, какой код нужно для этого прописать?