Carte de france et excel

titoune21312 -  

Bonjour, 

j'aurais une petite question, est ce qu'il serait possible de créer une carte de France en interactif  avec les départements affiché 

et en parallèle faire un tableau où je m'explique 

il y a plusieurs caractéristique le 1er toujours en liste déroulante : 3 éléments 

le premier : département 

   second : le transporteur 

le troisième : le volume par le transporteur 

je voudrais juste que lorsque je sélectionne un département ca le mette en évidence pour se repérer d'où il se trouve , par quoi je pourrais commencer avec Excel 2016 je peux également avoir Excel 2016 pro

Merci d'avance de votre aide 

6 réponses

  1.  via55

    Bonjour à tous

    Si ça peut aider voilà la carte que j'avais faite pour les régions

    https://www.cjoint.com/c/MAmnTOf8sxx

    Il suffit de s'en inspirer avec une carte des départements en svg qu'on peut trouver sur internet en fouillant un peu

    Cdlmnt

    Via

    1
    1. via55

      Re,

      J'ai retrouvé ma carte colorable des départements

      https://www.cjoint.com/c/MAmpQwrA8zx

      Cdlmnt

      Via

      1
      1. titoune21312 Auteur

        Salut , 

        merci super top juste par curiosité comment tu as fait ? 

        0
    2. Raymond PENTIER

      Bonjour.

      Toutes les infos sont ici

      0
      1. Mike-31

        Bonjour,

        C'est possible mais uniquement si tu as de bonnes connaissances en VBA et de la patience parce qu'il faut commencer par constituer la carte de France département par département sous forme de Shape pour traiter indépendamment chaque département.

        ce sera déjà un bon début

        0
        2. lynyrd1960

          Bonjour le forum

          Si ca peut aider.

          https://www.cjoint.com/c/MAmohriQFcU

          A+

          0
          1. titoune21312 Auteur

            Bonjour , 

            merci pour faire celà cest du vba ? Comment tu as fait pour dès lors que l'on choisit une ville tout se mette à jour avec l'indication de la région ?

            Merciii

            0
        3. via55

          Oui c'est assez simple

          1) dans la feuille DATA on a la liste des départements auxquels sont associés leurs codes numérique, par ex 69 pour le Rhône, la liste des départements sert pour la liste déroulante en B3

          2) j'ai nommé chaque shape (forme) de département FR-code du dept, par exemple la forme Rhône est nommée FR-69

          3) La macro en VBA ci-dessous se lance à chaque changement de B3

          Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect([B3], Target) Is Nothing And Target.Count = 1 Then
    If Target <> "" Then
     For Each c In Sheets("DATA").Range("B2:B96")  ' boucle sur les departements
     num = WorksheetFunction.VLookup(c, Sheets("DATA").Range("B2:C96"), 2, 0)
     If c = Target.Value Then ActiveSheet.Shapes("fr-" & num).Fill.ForeColor.RGB = RGB(255, 255, 0) Else ActiveSheet.Shapes("fr-" & num).Fill.ForeColor.RGB = RGB(255, 255, 255)
     Next
    End If
  End If
End Sub

          La macro boucle sur la liste des départements et récupère dans la variable num par une RECHERCHEV le code associé

          Si le département est celui choisi dans la liste déroulante alors on colore en jaune le shape nommé fr-num sinon on le colore en blanc

          et voilà

          0