CodePudding user response:
YourExcelApplication. Cell (x + 1, y). The Value:=YearOf (StringToDate (YourExcelApplication. Cell (x, y). The Value));YourExcelApplication. Cell (+ 2 x, y). The Value:=MonthOf (StringToDate (YourExcelApplication. Cell (x, y). The Value));
YourExcelApplication. Cell (+ 3 x, y). The Value:=DayOf (StringToDate (YourExcelApplication. Cell (x, y). The Value));