Carte choroplèthe

Bonjour à tous!!

Je suis toute nouvelle sur ce forum en espérant que vous pourrez m'aider un résoudre un souci qui me rend complètement dingue depuis maintenant plus d'une semaine!

Je travaille sur mon projet de fin d'études et j'ai besoin de créer une carte interactive afin d'illustrer des parts de marché. J'ai déjà pas mal avancé mais là je sèche.. Je vais donc essayer d'être la plus précise et structurée possible, mais soyez cléments, c'est ma 1ère fois!

Voilà le problème:

Dans la Sheet 1 ( "Uk_zip_code_map_2"), vous trouverez la carte qui représente les parts de marché de 3 produits en UK. Chaque zone représente une région d'Angleterre.

Dans cette feuille, vous pouvez voir qu'il y a la légende des couleurs ainsi que deux choses à choisir :

* le type de produit

* le jeu de couleurs désiré.

Jusque-là tout va bien.

Dans la 2ème feuille nommée "data" , je reprends toutes les données.

Dans la 3ème et dernière feuille nommée "Control", les différentes infos pour les couleurs, etc sont reprises.

La colonne H "Séléction" de la feuille DATA représente la valeur effectivement choisie qui devrait etre représentée sur la carte (les valeurs changent si je choisis un autre type de produit). Le problème est que la couleur qui apparait sur la carte ne correspond en rien avec le pourcentage repris dans la colonne H.

On dirait que cette colonne ne synchronise pas du tout avec la carte.

Par exemple, si on choisit la région "Highland", on voit que pour le type de produit n°2, la valeur de la colonne H est de 100%.

(Personnellement, j'ai choisi le code couleur "PAIRWISE" qui est le plus facile pour distinguer les différences).

Donc, si la valeur est de 100% , la couleur représentée sur la carte devrait être mauve foncé. Eh ben non !! Elle est verte claire, ce qui représente une valeur comprise entre 10% et 25 %.

Petit détail important qui pourrait vous être utile, le fichier que je joins provient ( à la base) d'un site internet en anglais dont voici le lien: http://www.clearlyandsimply.com/clearly_and_simply/2009/06/choropleth-maps-with-excel.html

Il était à la base avec une carte de l'Allemagne.

Heuuu... Ben voilà en fait je crois que je vous ai exposé le problème. Je vous joins le fichier sur lequel je travaille.

Je peux aussi vous fournir l'original si vous voulez.

N'hésitez pas à me demander plus d'infos si je n'ai pas été claire sur certains points ou si j'ai oublié de vous donner certains détails importants!

En tout cas, je vous dis déjà un grand merci d'avance!!

Lowi

Bonjour,

essaie en lançant la procédure RecreateShapeIndex, pour initialiser l'index de la carte.

lancer la procédure par alt-F8

Bonjour H2so4, Merci de ta réponse!

J'ai déjà essayé. En fait, c'est la 1ère chose que j'ai faite après avoir changé la carte initiale.

Ca remet l'index des shapes (colonne J de la feuille "data") . Mais ça ne semble pas fonctionner...

Bonjour,

chez moi cela fonctionne, peux-tu me donner un exemple d'une donnée qui s'afficherait mal ?

Bien sur, si tu prends la shape de nom "North Yorkshire" et que tu choisir le type de produit n° 2, tu vois que la valeur devrait être de 0% alors que la couleur reprise sur la carte représente une valeur entre 60 et 70% ..

re-Bonjour,

les valeurs ne sont pas correctement affichées à l'ouverture du classeur, mais si tu sélectionnes produit 1, cela semble correct, si tu re-sélectionnes ensuite produit 2 cela semble correct aussi.

Re !! C'est dingue, chez moi ça ne fonctionne pas.. Est-ce que tu as fait autre chose que de recréer l'index?

j'ai changé le jeu de couleur en "pairwise".

Tu peux essayer de lancer manuellement la procédure updatemap, via alt-f8

Bonjour !!

En fait, en cherchant hier, j'ai découvert que c'est peut-etre lié à la version d'Excel.

Est-ce qu'à tout hasard tu utilises Excel 2007?

Merci,

Lowi

Bonjour,

j'ai testé avec une version UK 2010. as-tu essayé en lançant manuellement updatemap ?

Re,

j'ai également testé avec la version UK 2013 et là, cela ne donne pas les bons résultats.

mes recherches pour comprendre pourquoi, n'ont rien donné jusqu'à présent.

Bonjour,

sans comprendre pourquoi,

je vois que l'index crée par recreateshapeindex n'est pas correct. j'y ai vu un décalage de 2. dans ma version 2013

voici une procédure pour corriger l'index

Sub correctindex()
Dim i As Object
RecreateShapeIndex
For Each i In Range("myshapeindex")
 i.Value = i.Value + 2
Next
End Sub

et voici une procédure pour vérifier si l'index est correct

Sub verifyshapesindex()

Dim i, si, erreur
For Each i In Range("myshapeindex")
 si = i.Value
 If i.Offset(0, -1) <> Sheets(1).Shapes(si).Name Then
  MsgBox "valeur de l'index incorrecte pour " & i.Offset(0, -1) & " devrait être " & Sheets(1).Shapes(si).ZOrderPosition & " mais est " & si & " dans l'index"
  erreur = erreur + 1
  End If
 Next i
 If erreur = 0 Then
  MsgBox "l'index semble correct"
End If

End Sub