Commerce extérieur de la France - COM-EXT

Données - INSEE

Info

Last observation: 2026-05

First observation: 1999-01

Number of observations: 536 721

Last data update: 24 jul 2026, 03:59. Last compile: 24 jul 2026, 05:40

Structure

LAST_DOWNLOAD

LAST_DOWNLOAD
2026-07-23

Solde FAB-FAB

Code
`COM-EXT` %>%
  filter(INDICATEUR == "SFF")
# # A tibble: 250 × 35
#    FREQ  SERIE_ARRETEE CORRECTION REF_AREA BASIND COM_EXT_NAF2 NATURE   ZONE_ECO
#    <chr> <chr>         <chr>      <chr>    <chr>  <chr>        <chr>    <chr>   
#  1 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  2 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  3 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  4 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  5 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  6 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  7 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  8 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
#  9 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
# 10 M     FALSE         CVS-CJO    FE       SO     R1001        VALEUR_… SO      
# # ℹ 240 more rows
# # ℹ 27 more variables: UNIT_MULT <chr>, UNIT_MEASURE <chr>, INDICATEUR <chr>,
# #   IDBANK <chr>, TITLE_FR <chr>, TITLE_EN <chr>, LAST_UPDATE <chr>,
# #   DECIMALS <chr>, TIME_PERIOD <chr>, OBS_VALUE <dbl>, OBS_STATUS <chr>,
# #   OBS_QUAL <chr>, OBS_TYPE <chr>, OBS_REV <chr>, Freq <chr>,
# #   Serie_arretee <chr>, Correction <chr>, Ref_area <chr>, Basind <chr>,
# #   Com_ext_naf2 <chr>, Nature <chr>, Zone_eco <chr>, Indicateur <chr>, …

Automobiles

Graph

Code
`COM-EXT` %>%
  
  filter(COM_EXT_NAF2 == "29-1") %>%
  month_to_date() %>%
  arrange(date) %>%
  mutate(OBS_VALUE = OBS_VALUE %>% as.numeric) %>%
  ggplot + geom_line(aes(x = date, y = OBS_VALUE, color = Zone_eco)) + 
  theme_minimal() + xlab("") + ylab("Indice de Volume des Exportations Automobiles") +
  scale_x_date(breaks = seq(1960, 2020, 2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%y")) +
  scale_y_log10(breaks = seq(0, 200, 10),
                     labels = dollar_format(accuracy = 1, prefix = "")) +
  scale_color_manual(values = viridis(5)[1:4]) +
  theme(legend.position = c(0.7, 0.9),
        legend.title = element_blank())

Table

Code
`COM-EXT` %>%
  
  filter(COM_EXT_NAF2 == "29-1") %>%
  month_to_date() %>%
  arrange(date) %>%
  mutate(OBS_VALUE = OBS_VALUE %>% as.numeric) %>%
  arrange(desc(date)) %>%
  head(30) %>%
  select(date, ZONE_ECO, Zone_eco, OBS_VALUE) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Exportations Monde Entier

Table

Code
`COM-EXT` %>%
  filter(INDICATEUR == "E",
         ZONE_ECO == "190",
         TIME_PERIOD == "2020-07") %>%
  
  select(COM_EXT_NAF2, Com_ext_naf2, TITLE_FR, OBS_VALUE) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Cuir, Meubles

Code
`COM-EXT` %>%
  filter(COM_EXT_NAF2 %in% c("15", "16"),
         ZONE_ECO == "190",
         NATURE == "INDICE_VOL") %>%
  
  
  month_to_date() %>%
  select(COM_EXT_NAF2, Com_ext_naf2, INDICATEUR, Indicateur, date, OBS_VALUE) %>%
  arrange(date) %>%
  ggplot + geom_line(aes(x = date, y = OBS_VALUE, color = Com_ext_naf2, linetype = Indicateur)) + 
  theme_minimal() + xlab("") + ylab("Indice de Volume") +
  scale_x_date(breaks = seq(1960, 2020, 2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%y")) +
  scale_y_log10(breaks = seq(0, 500, 20),
                labels = dollar_format(accuracy = 1, prefix = ""),
                limits = c(40, 350)) +
  scale_color_manual(values = viridis(5)[1:4]) +
  theme(legend.position = c(0.5, 0.8),
        legend.title = element_blank())

Textile, Habillement

Code
`COM-EXT` %>%
  filter(COM_EXT_NAF2 %in% c("13", "14"),
         ZONE_ECO == "190",
         NATURE == "INDICE_VOL") %>%
  
  
  month_to_date() %>%
  select(COM_EXT_NAF2, Com_ext_naf2, INDICATEUR, Indicateur, date, OBS_VALUE) %>%
  arrange(date) %>%
  ggplot + geom_line(aes(x = date, y = OBS_VALUE, color = Com_ext_naf2, linetype = Indicateur)) + 
  theme_minimal() + xlab("") + ylab("Indice de Volume") +
  scale_x_date(breaks = seq(1960, 2020, 2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%y")) +
  scale_y_log10(breaks = seq(0, 500, 20),
                labels = dollar_format(accuracy = 1, prefix = ""),
                limits = c(40, 350)) +
  scale_color_manual(values = viridis(5)[1:4]) +
  theme(legend.position = c(0.5, 0.8),
        legend.title = element_blank())

Table

Code
`COM-EXT` %>%
  filter(ZONE_ECO == "190") %>%
  
  mutate(series = paste0(INDICATEUR, "-", NATURE)) %>%
  group_by(COM_EXT_NAF2, Com_ext_naf2, series) %>%
  summarise(change =  round(100*(OBS_VALUE[TIME_PERIOD == "2020-01"]/OBS_VALUE[TIME_PERIOD == "2019-01"]-1), 1)) %>%
  spread(series, change) %>%
  print_table_conditional()