Получить год из ячейки и создать другую дату

#excel #vba

#excel #vba

Вопрос:

У меня есть столбец с разными датами. Я обрабатываю каждую из этих дат как часть цикла. Мне нужно получить дату, 31 марта и год из ячейки.
Например:

 4/5/2014     3/31/2014  
7/5/1999     3/31/1999 
  

и т.д…

Ответ №1:

Используйте DateSerial:

 ActiveSheet.Range("B1").Value = DateSerial(Year(ActiveSheet.Range("A1")), 3, 31)
  

Комментарии:

1. Спасибо. DateSerial — это то, что мне было нужно