Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Date Picker. Как включить в проект mscomct2.ocx, чтобы запускать на любом компьютере?
 
Добрый день, смастерил генератор заполнения случайными датами, но проблема в том, что в проект добавлен mscomct2.ocx (поля со списком выбора дат) и если запускать этот документ на другой машине с Windows 10, эти элементы не прорисовываются, возникает ошибка. Это на каждом клиенте прижется вручную регистрировать mscomct2? А можно как-то включить библиотеку сразу в документ?
VBA, Заполнить диапазон ячеек рандомными датами
 
Добрый день! Подскажите, плиз - нужно при помощи формы задавать диапазон дат и в выбранном диапазоне заполнять лист рандомными датами. Сначала сделал вот так, без формы:
Range("A1:A50").Formula = "=RANDBETWEEN(DATE(2018,1,1),DATE(2020,1,1))"
Просто проверить чтобы. Добавил форму, набросал 2 Date Picker'а - рядом кнопка "Считать". Забираю значения дат и надо бы их передать в RANDBETWEEN, но не пойму, в каком формате это делается. То есть если -
Код
Private Sub CommandButton1_Click()
date1 = DTPicker1.Value
date2 = DTPicker2.Value
Range("A1:A50").Formula = "=RANDBETWEEN(date1,date2)"
End Sub

ничего не получается. Как правильно передать значение в данном случае? Заранее благодарен :-)
Страницы: 1
Наверх