incrementare data in una cella excel da vba

[Carlitos84]

Risolto con:

Cells(1, 1) = DateSerial(Year(Cells(1, 1)), Month(Cells(1, 1)) + 4, 0)