Créer une "carte choroplèthe" sur Excel 2019 [Résolu]

Signaler
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
 -
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
 -
Bonsoir,

J'aimerais créer, sur Excel 2019, une "carte choroplèthe" (carte avec plusieurs couleurs ou niveaux de couleurs qui définissent une valeur comme ceci par exemple : https://fr.wikipedia.org/wiki/Carte_choropl%C3%A8the#/media/Fichier:2004US_election_map.svg) en utilisant des codes postaux comme valeurs.

Est-ce que quelqu'un à un exemple simple d'utilisation ou une explication plus simple que ce qu'on trouve sur le net afin de réaliser ce genre de carte ?

Merci d'avance !
Afficher la suite

4 réponses

Réponse 1 / 4
Messages postés
52493
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
24 octobre 2020
 14 364
Bonjour.

Non, il n'y a pas d'explication simple, car le logiciel n'est pas simple à exploiter.
https://www.bing.com/search?q=carte+choroplethe+excel&form=EDGEAR&qs=SC&cvid=e06b0d0ebe8b482f8829c6cb17bbb30c&cc=FR&setlang=fr-FR&elv=AQj93OAhDTi%2AHzTv1paQdniLSBGjqiBeqhef%21tehvUikVt8Jv1m%21HseWQouQbWokjdN8BuvXrjx1Ir8ELcEp8Vle3L3A9jD%2AeEt5witlK8zz
Réponse 2 / 4
Messages postés
12787
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 octobre 2020
 2 049
Bonjour

Il faut d'abord te procurer une carte vectorielle de la région ou pays concerné où chaque territoire est un shape (forme) indépendant (format svg en général)
Ensuite par macro tu peux faire colorer chaque forme selon un tableau de donnée et une légende
Exemple avec la carte des régions françaises :
https://cjoint.com/c/JDDwXd38GfI

Cdlmnt
Via
Signaler
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
Merci beaucoup pour votre réponse ! Je viens de télécharger une carte vectorielle, mais je ne comprends pas bien le code dans VBA pour l'activer sur ma carte. Pouvez-vous m'envoyer le code et m'expliquer ce qu'il faut mettre dans chaque partie si ma feuille 1 = ma base de données (provinces et codes postaux) et si ma feuille 2 = ma carte ?
Signaler
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
 >
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
J'ai une liste de différents codes postaux qui correspondent à des provinces (de Belgique). Plusieurs codes postaux correspondent à la même province. Mon but est que les provinces soient colorées en fonction du plus grand nombre de codes postaux dans la même province. Donc, s'il y a 4 fois un code postal pour la province du Hainaut et 2 fois un code postal pour la province de Liège, la province du Hainaut sera colorée avec une couleur plus foncé.
Réponse 3 / 4
Messages postés
12787
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 octobre 2020
 2 049
Re,

Dans mon fichier dans l'éditeur VBA tu as le code
1) Les noms des shapes doivent être identiques à ceux dans la liste de la feuille de données (delais2)
2) La macro boucle sur les lignes de cette feuille de données et lit le nom de la région et la valeur attribuée 
Sub colorer2()
Dim nom As String
For n = 3 To 15
nom = Sheets("delais2").Range("A" & n).Value ' nom de la region
delai = Sheets("delais2").Range("B" & n).Value ' délai pour la région
'En fonction du délai récupère le couleur de la légende
If delai = 24 Then col = ActiveSheet.Range("b2").Interior.Color Else If delai = 48 Then col = ActiveSheet.Range("b4").Interior.Color Else If delai = 72 Then col = ActiveSheet.Range("b6").Interior.Color Else col = ActiveSheet.Range("b8").Interior.Color
ActiveSheet.Shapes(nom).Fill.ForeColor.RGB = col ' colorie le shape
Next
End Sub


Si tu n'arrives pas adapter poste ton fichier sur cjoint.com, copie le lien créé et reviens le colelr ici, je regarderai

Cdlmnt
Via
Signaler
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
Rebonjour,

Merci pour la réponse ! Mais oui je veux bien que vous essayez. Voici le lien : https://www.cjoint.com/c/JDEqhO4D53k.

La carte est en feuille 1 et la base de données en 2.

Merci d'avance !
Réponse 4 / 4
Messages postés
12787
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 octobre 2020
 2 049
Re

Ton fichier avec la macro
https://www.cjoint.com/c/JDEreN7mX6I

Tu peux changer les couleurs dans la légende et relancer la macro avec le bouton
ALT+F11 pour voir le code

Cdlmnt
Via

Signaler
Messages postés
31
Date d'inscription
dimanche 17 septembre 2017
Statut
Membre
Dernière intervention
30 avril 2020
Un grand merci à vous, c'est super !
Répondre Posez votre question