diff --git a/R/SeriesAggreg.data.frame.R b/R/SeriesAggreg.data.frame.R
index 5a467039d1d6d2ee4da3dd99be7b6a8e5d236757..b4d83f3d1592e113ad5b1482ff1972fb809ee97f 100644
--- a/R/SeriesAggreg.data.frame.R
+++ b/R/SeriesAggreg.data.frame.R
@@ -184,6 +184,7 @@ SeriesAggreg.data.frame <- function(x,
                     all.y = FALSE)
   tsAggreg <- tsAggreg[tsAggreg$Selec & tsAggreg$DatesRini, ]
   tsAggreg <- tsAggreg[, colnames(TabSeries0)]
+  colnames(tsAggreg)[1L] <- colnames(x)[1L]
   return(tsAggreg)
 
 }