Succede semplicemente perché, in quel caso, l'area target include la riga 1, dove ci sono le stringhe della testata.
E nella riga 1 hai un errore di conversione della data (ovviamente, visto che nella riga 1 non c'è una data ma un testo)

Basta modificare la macro in modo che non esegua nulla nel caso di r = 1