Поддержка, необходимая для программирования vba для всплывающего календаря

У меня нет опыта работы с vba, и я бы очень признателен за вашу помощь в реализации всплывающей пользовательской формы календаря. Эта ссылка направит вас к источнику календаря, который я пытаюсь ввести в мою книгу:

http://www.ozgrid.com/forum/showthread.php?t=142603

Я скопировал модуль класса, форму пользователя и модуль в свою книгу. Когда я запускаю макрос, это открывает форму пользователя, где я могу выбрать желаемую дату в календаре. То, что я пропустил, – это возможность отправить дату, выбранную в календаре, в определенную ячейку в моей книге. Я был бы очень признателен, если бы кто-нибудь мог направить меня на то, как написать несколько строк кода, которые отправят дату, выбранную в пользовательской форме, в конкретную ячейку моей книги! Опять же, я очень новичок в этом, поэтому дайте мне знать, если что-то неясно в моем объяснении. Я потратил много времени на это, поэтому любая поддержка высоко ценится! Вероятно, для вас это займет всего несколько минут, но для меня это значило бы!

Попробуйте этот пост . Это семестра, чтобы дать лучшее руководство для работы с datepicker control . Однако он показывает кодирование, чтобы сделать надстройку.

Следовательно, самый основной подход для вас был бы,

  • Добавить форму
  • Добавить управление датой
  • код оттуда

за эту статью .

Но помните, что управление календарем в Excel / Access иногда может исчезнуть из-за этой причины, упомянутой в моем сообщении .

Если вы планируете использовать элемент управления date picker , вот код для передачи значения из формы в любом месте, которое вы хотите;)

 Private Sub myDtPicker_Change() Dim dtDateSelected as Date dtDateSelected = myDtPicker.Value '-- do anything else End Sub 

Класс записывает выбранную дату в текстовое поле. После того, как вы выбрали дату, вы можете использовать значение текстового поля для установки значения ячейки.

 Private Sub UserForm_Initialize() Set clsCal = New clsCalendar 'Initialize the Class' Set clsCal.Form(Me.TextBoxDate) = Me 'Tells the class to write the Selected date' ' into the textbox "Me.TextBoxDate"' End Sub 

Поэтому в этом примере, когда вы выбираете дату, класс автоматически сохраняет выбранную дату в текстовом поле.

После того, как вы выбрали дату, вы можете использовать следующий код, чтобы добавить значение в ячейку:

  Range("A1").value=TextBoxDate.Value 
  • Сохранить флажок выбора пользовательской формы в массиве (для репликации на пользовательской форме)
  • Excel VBA Userform - Как увеличить / уменьшить дату на один месяц
  • Userform.Show на кнопке формы не распознает пользовательскую форму, получив ошибку 424
  • Скрыть закрытую кнопку в пользовательской форме excel vba для моей панели выполнения
  • Заполнение ComboBox со списком диаграмм на листе
  • Возврат ответа с помощью VBA в TextBox
  • Excel VBA Userform
  • Код для автоматического обновления Userform
  • Попытка ссылаться на другой рабочий лист в активной книге
  • Отобразить строку текста в текстовом поле на основе множественного флажка в пользовательской форме
  • Как использовать значение переменной Userform Global Variable в разных книгах с помощью VBA
  • Interesting Posts

    Вызовы пользователей в нескольких модулях

    xlwt не может записать файл xls?

    Excel. Создайте список динамических исключений, который пропускает определенные значения.

    VBA: Следующий без ошибки FOR

    Запуск макроса, который будет выполняться в этой книге из макроса, хранящегося в Word

    Формула Excel: захватить имя столбца, соответствующее определенной ячейке

    Заявление IF (это должно быть легко)

    Код VBA для удаления для Excel 2010

    Какую сумму мне нужно сообщить клиенту, чтобы получить сумму, которую я хочу в руке

    Лучший метод источника данных с несколькими запущенными приложениями

    Формула, чтобы найти строки в столбце, содержащие текст из другого столбца

    Как подсчитать видимые элементы в определенном поле сводной таблицы без цикла?

    Просмотр excel в MVC 4

    Java arraylist, как читать DDE двойные значения из файла excel и записывать в массив?

    Вставить запрос SQL Server в книгу Excel

    Давайте будем гением компьютера.