Export R Output to Excel change Format

Question

Hi I want to export this output

#forecast by auto.arima, period = 2 months (changeable) output <- lapply(tsMat, function(x) forecast(auto.arima(x), h=