Я намереваюсь ввести в таблицу серию чисел, которая является последним числом года моей даты, а также юлианской датой и номером моей даты, если я установил 2/6/2019 как 1001.
Вот мой код:
AddNew.Offset(m, 4).Value = Right(Year(DTPickerActualHarvestDate), 1) & _
Format(DatePart("y", DTPickerActualHarvestDate), "000") & _
DateValue(DTPickerActualHarvestDate.Value) - 42501
Проблема в том, что если я сам введу DateValue(DTPickerActualHarvestDate.Value) - 42501
, получится правильный результат, как и первая часть. Но когда я собрал их вместе, последняя часть снова перешла бы с номера на дату. Например, если моя дата 2/6/2019
, она должна отображаться с 90371001
, а теперь отображается как 90379/27/1902
. Как я могу это исправить?