Как добавить .5 лет к дате в ячейке, используя VBA?

Question

Я хочу добавить 1,5 года или 8,5 лет в ячейку, которая является датой. Я использовал функцию DateAdd, но когда я пытаюсь добавить .5 лет, она не работает. Можно добавить только полные годы, например, 1, 2 ..... Можно ли добавить полугодия?

Answer 1

Добавьте месяцы:

=EDATE(A1,8.5*12)

в VBA мы можем использовать DateAdd:

 NewDate = DateAdd("m", 8.5 * 12, OldDate)

Answer 2

DateAdd (интервал, число, дата), как вы видите, DateAdd принимает 3 параметра. Параметр интервала может быть гггг (год), q (квартал), м (месяц), y (день года), d (день), w (день недели), ww (неделя), h (час), n ( минута), с (секунда). Похоже, вы добавляете годы. Используйте интервал m и добавьте количество месяцев.

Answer 3

Даты в Excel записываются как целые числа, только что отформатированы и отображаются указанным c способом. Вы можете добавлять к датам так же, как и к любому другому номеру, без необходимости вводить функцию.

Если вы записываете сегодняшнюю дату (9 марта 2020 г.) в ячейку A1, вы можете добавить год к сегодняшней дате с помощью просто пишу =A1+365. В качестве альтернативы, чтобы добавить пол года, =A1+(365/2)