Определите номер недели, номер месяца, год с момента управления DatePicker в пользовательской форме VBA

Я пытаюсь сделать свою работу с пользователем, получая коды повсюду. У меня нет опыта в VBA, поэтому у меня есть код из разных источников.

У меня есть элемент управления datepicker в моей пользовательской форме, и я бы хотел получить соответствующий номер недели, номер месяца и год на основе даты, выбранной из поля управления датой и заполнить соответствующие текстовые поля для каждого

datepicker и текстовые поля .

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

TextBoxWeek.Value = DatePart("ww", TextBoxDatePicker.Value, vbMonday, vbFirstJan1 ) 

Месяц:

 TextBoxMonth.Value = format(TextBoxDatePicker.value,"mm") 

Год: (вы также можете использовать «yy», чтобы получить сокращенную дату, например «17», а не «2017»)

 TextBoxYear.Value = format(TextBoxDatePicker.value, "yyyy") 
  • Excel VBA; UserForm, запуск одного фрагмента кода для разных значений TextBox
  • Как сделать текстовое поле ActiveX только для чтения, но прокручиваемым в Excel 2013?
  • Excel: текстовое поле объекта не может выполнять возврат каретки в защищенных или незащищенных состояниях листа (w / Text Unlocked) ... почему?
  • Управление текстовым полем в Excel - как ссылаться в Perl
  • Сохранить значение текстового поля, VBA, Excel
  • Получение текста из хеш-таблицы текстовых полей
  • Добавление текстовых и текстовых значений в ячейку
  • Excel 2010 не может вставляться в текстовое поле формы
  • Ячейка, связанная с текстовым полем ActiveX, возвращающая текст вместо номера
  • Как получить доступ к текстовому блоку, размещенному на листе в модуле VBA?
  • Управление данными из текстового поля и значений инвертированного дня / месяца
  • Interesting Posts

    Установите рабочий лист.hide_gridlines (2) в определенный диапазон ячеек

    Пакет SSIS не записывает данные в целевой пункт назначения

    Automation.RemoveAutomationFocusChangedEventHandler, используемый в ExcelDNA addin Вызывает Excel для работы в фоновом режиме

    Заменить текст с помощью подстановочных знаков

    Excel обрезает строковые данные до 255 символов. Как я могу читать целые строковые данные без изменения реестра

    Неверное обновление пользовательской функции Excel

    Сделать гистограммы разными цветами

    Как применять сплошные цвета к панели данных в Excel VBA?

    VBA запускает макрос только один раз

    COUNTIFS с несколькими диапазонами и критериями

    VBA – найти количество элементов в столбце, предполагая, что длина может измениться в будущем

    Ключевое слово COUNT (DISTINCT table_name) не работает с OleDB

    Определения типа Excel VBA Excel: определение определения члена изменяет регистр

    Код VBA для форматирования текста, скопированного из Excel в PowerpoInt

    Как превратить формулу Excel в UDF?

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