Carte géographique interactive
amo-51
Messages postés
94
Date d'inscription
Statut
Membre
Dernière intervention
-
amo-51 Messages postés 94 Date d'inscription Statut Membre Dernière intervention -
amo-51 Messages postés 94 Date d'inscription Statut Membre Dernière intervention -
Bonjour;
j'ai crée une carte interactive sur excel attachée à des données statistiques par région comprenant :population, densité géographique, nombre d'entreprise installé dans la région
je souhaiterai créer une macro VBA où une région sur la carte prend une couleur selon une le nombre d'entreprise installée
j ai une fourchette de 0 à 7 cases
Classes Nbre entreprises installée région couleur
0 0 a vert
1 2 b bleu
2 4 c ....
3 8 d ....
4 10 e ....
5 14 f ....
6 plus 14 h Rouge
merci de m'aider
j'ai crée une carte interactive sur excel attachée à des données statistiques par région comprenant :population, densité géographique, nombre d'entreprise installé dans la région
je souhaiterai créer une macro VBA où une région sur la carte prend une couleur selon une le nombre d'entreprise installée
j ai une fourchette de 0 à 7 cases
Classes Nbre entreprises installée région couleur
0 0 a vert
1 2 b bleu
2 4 c ....
3 8 d ....
4 10 e ....
5 14 f ....
6 plus 14 h Rouge
merci de m'aider
A voir également:
- Carte géographique interactive
- Carte d'identité - Accueil - Services publics
- Pile carte mere - Guide
- Localisation géographique - Guide
- Changer carte graphique - Guide
- Débloquer carte sim sans code puk - Guide
12 réponses
Bonjour
Pour t'aider il faut ton fichier et ta carte qui doit être composée de formes (shapes) distincts par régions à colorier
Poste un exemple de ton fichier sur mon-partage .fr, fais créer un lien que tu copies et reviens coller ici
Cdlmnt
Via
Pour t'aider il faut ton fichier et ta carte qui doit être composée de formes (shapes) distincts par régions à colorier
Poste un exemple de ton fichier sur mon-partage .fr, fais créer un lien que tu copies et reviens coller ici
Cdlmnt
Via
amo-51
Messages postés
94
Date d'inscription
Statut
Membre
Dernière intervention
Fichier : https://www.transfernow.net/?utm_source=partagefichierscom&utm_medium=download
Ca ne fonctionne pas il faut un nom d'utilisateur et un mdp!
Poste ton fichier sur mon-partage.fr stp
Poste ton fichier sur mon-partage.fr stp
L'administration est disponible sur la page de téléchargement ou via le lien ci-dessous pour supprimer le mot de passe ou supprimer le fichier.
https://www.transfernow.net/?utm_source=partagefichierscom&utm_medium=download
Utilisateur : v4yi6nt1
Mot de passe : 8e7ys4vb
https://www.transfernow.net/?utm_source=partagefichierscom&utm_medium=download
Utilisateur : v4yi6nt1
Mot de passe : 8e7ys4vb
Si tu veux par souci de confidentialité tu peux m'envoyer le fichier en message privé (clic sur mon pseudo)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Je n'y arrive toujours pas
Je t'ai écrit un message en privé
Clic sur la petite enveloppe à côté de ton pseudo dans la barre noire tout en haut
Je t'ai écrit un message en privé
Clic sur la petite enveloppe à côté de ton pseudo dans la barre noire tout en haut
Bonjour;
on voulant accéder au fichier aujourd'hui et exécuter la macro, excel m'a affiché ce message d'erreur
merci de vouloir bien m'aider
on voulant accéder au fichier aujourd'hui et exécuter la macro, excel m'a affiché ce message d'erreur
merci de vouloir bien m'aider
Je ne comprends
Pas de bug chez moi, j'ai fait réactualiser et tout se colorie bien :
https://mon-partage.fr/f/bMLIE3yn/
Cdlmnt
Via
Pas de bug chez moi, j'ai fait réactualiser et tout se colorie bien :
https://mon-partage.fr/f/bMLIE3yn/
Cdlmnt
Via
Bonjour;
je viens de réessayer mais sans sucés
excel m'indique que l erreur se trouve dans ces deux requêtes
'ActiveSheet.Shapes(nom).Fill.ForeColor.RGB = coul ' colore la forme avec nom de région
'ActiveSheet.Shapes(forme).Fill.ForeColor.RGB = coul 'colore la forme avec nom de forme
aussi, j aimerai savoir pourquoi 'coul' n' a pas été defini
merci de m'orienter
je viens de réessayer mais sans sucés
excel m'indique que l erreur se trouve dans ces deux requêtes
'ActiveSheet.Shapes(nom).Fill.ForeColor.RGB = coul ' colore la forme avec nom de région
'ActiveSheet.Shapes(forme).Fill.ForeColor.RGB = coul 'colore la forme avec nom de forme
aussi, j aimerai savoir pourquoi 'coul' n' a pas été defini
merci de m'orienter
Bonjour
Je ne sais pas non plus (à moins que tu aies changé la place de la légende
Essaie de remplacer les 3 lignes de la macro qui gèrent la couleur par celle-ci pour voir si ça bug aussi :
Cdlmnt
Via
Je ne sais pas non plus (à moins que tu aies changé la place de la légende
Essaie de remplacer les 3 lignes de la macro qui gèrent la couleur par celle-ci pour voir si ça bug aussi :
If clas > 26 Then coul = Range("E27").Interior.ColorIndex Else coul = Range("E" & clas).Interior.ColorIndex ' récupère couleur dans légende
ActiveSheet.Shapes(nom).DrawingObject.Interior.ColorIndex = coul ' colore la forme avec nom de région
ActiveSheet.Shapes(forme).DrawingObject.Interior.ColorIndex = coul 'colore la forme avec nom de forme
Cdlmnt
Via
Bonjour
je reviens vers vous via55
j'ai toujours ce massage d'erreur qui s'affiche lors de l'exécution de ma macro
"Run time error '-2147024809(80070057)':
the item with the specified name was not found"
j'ai remarqué que la macro s arrête à la ligne 4 , probablement que l erreur est dans cet emplacement
merci de m aider
mais surtout j aimerai bien connaitre la signification de cette erreur
je reviens vers vous via55
j'ai toujours ce massage d'erreur qui s'affiche lors de l'exécution de ma macro
"Run time error '-2147024809(80070057)':
the item with the specified name was not found"
j'ai remarqué que la macro s arrête à la ligne 4 , probablement que l erreur est dans cet emplacement
merci de m aider
mais surtout j aimerai bien connaitre la signification de cette erreur