Fill series with irregular gaps in between - VBA