Last observation: Q: 2026-09-30 (N = 21)
First observation: Q: 2002-12-31 (N = 93)
Last data update: 16 aoû 2026, 20:11. Last compile: 17 aoû 2026, 22:07
Enquête auprès des banques sur la distribution du crédit - BLS
Données - BDF
Info
Structure
LAST_DOWNLOAD
| LAST_DOWNLOAD |
|---|
| 2026-08-16 |
Facteurs d’évolution des critères d’octroi de crédit
Soldes d’opinion nets (en %) : une valeur positive signifie qu’une majorité de banques déclare un durcissement des critères d’octroi lié à ce facteur.
Crédits aux entreprises
Code
BLS |>
filter(variable %in% c("BLS.Q.FR.ALL.GEA.E.Z.B3.ST.S.FNET",
"BLS.Q.FR.ALL.RCD.E.Z.B3.ST.S.FNET",
"BLS.Q.FR.ALL.CP.E.Z.B3.ST.S.FNET")) |>
mutate(Facteur = case_when(BLS_ITEM == "GEA" ~ "Perspectives économiques générales",
BLS_ITEM == "RCD" ~ "Risques relatifs aux garanties requises",
BLS_ITEM == "CP" ~ "Coûts liés au montant des fonds propres"),
value = value/100) |>
ggplot() + geom_line(aes(x = date, y = value, color = Facteur)) +
geom_hline(yintercept = 0, linetype = "dashed", color = "black") +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 2) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_continuous(labels = scales::percent_format(accuracy = 1)) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank(),
legend.text = element_text(size = 7))
Crédits à l’habitat (Ménages)
Code
BLS |>
filter(variable %in% c("BLS.Q.FR.ALL.GEA.H.H.B3.ST.S.FNET",
"BLS.Q.FR.ALL.HMP.H.H.B3.ST.S.FNET",
"BLS.Q.FR.ALL.BC.H.H.B3.ST.S.FNET")) |>
mutate(Facteur = case_when(BLS_ITEM == "GEA" ~ "Perspectives économiques générales",
BLS_ITEM == "HMP" ~ "Perspectives du marché du logement",
BLS_ITEM == "BC" ~ "Concurrence d'autres banques"),
value = value/100) |>
ggplot() + geom_line(aes(x = date, y = value, color = Facteur)) +
geom_hline(yintercept = 0, linetype = "dashed", color = "black") +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 2) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_continuous(labels = scales::percent_format(accuracy = 1)) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank(),
legend.text = element_text(size = 7))
Depuis 2015
Code
BLS |>
filter(variable %in% c("BLS.Q.FR.ALL.GEA.E.Z.B3.ST.S.FNET",
"BLS.Q.FR.ALL.RCD.E.Z.B3.ST.S.FNET",
"BLS.Q.FR.ALL.CP.E.Z.B3.ST.S.FNET")) |>
filter(date >= as.Date("2015-01-01")) |>
mutate(Facteur = case_when(BLS_ITEM == "GEA" ~ "Perspectives économiques générales",
BLS_ITEM == "RCD" ~ "Risques relatifs aux garanties requises",
BLS_ITEM == "CP" ~ "Coûts liés au montant des fonds propres"),
value = value/100) |>
ggplot() + geom_line(aes(x = date, y = value, color = Facteur)) +
geom_point(aes(x = date, y = value, color = Facteur)) +
geom_hline(yintercept = 0, linetype = "dashed", color = "black") +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = "1 year",
labels = date_format("%Y")) +
scale_y_continuous(labels = scales::percent_format(accuracy = 1)) +
theme(legend.position = c(0.3, 0.85),
legend.title = element_blank(),
legend.text = element_text(size = 7),
axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1))
Dernier trimestre disponible
Code
BLS |>
filter(BLS_COUNT_DETAIL %in% c("Z", "H"),
EFFECT_DOMAIN == "ST",
MARKET_ROLE == "S") |>
filter(!is.na(value)) |>
filter(date == max(date)) |>
select(Variable, date, value) |>
arrange(desc(value)) |>
print_table_conditional()| Variable | date | value |
|---|---|---|
| Octroi de crédits LT aux entreprises (perspectives à 3 mois) | 2026-09-30 | 9.09 |
| Octroi de crédits CT aux entreprises (perspectives à 3 mois) | 2026-09-30 | 9.09 |
| Octroi de crédits aux entreprises (perspectives à 3 mois) | 2026-09-30 | 9.09 |
| Octroi de crédits aux grandes entreprises (perspectives à 3 mois) | 2026-09-30 | 0.00 |
| Octroi de crédits aux PME (perspectives à 3 mois) | 2026-09-30 | 0.00 |
| Octroi de crédits à l'habitat (perspectives à 3 mois) | 2026-09-30 | -12.50 |