XL 2010 Assemble multiple polygons

Staple1600

XLDnaute Barbatruc

• 22 Février 2020

• #2

Bonsoir le fil, pastoche

pastoche

pastoche à dit:

Hello
my goal is to combine several polygons to make one
someone doesn't have a magic VBA code to do this
or a track

Cliquez pour agrandir...

Jadis tu étais francophone, non ?

recherche la valeur la plus grande

Bonjour j'ai 11 variables LGTOTAL = LG1 + LG2 + LG3 + LG4 + LG5 + LG6 + LG7 + LG8 + LG9 + LG10 + LG11 + LG12 Comment trouver la plus grand est ce obligatoire de passer par des IF Cordialement

www.excel-downloads.com

A moins, que ton post soit destiné un forum anglophone
Tu te serais mélangé les pinceaux, des fois? 😉

 

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 22 Février 2020

• #3

Bonjour
En effet je poste souvent sur les postes anglophones, car il y a beaucoup plus de monde et donc d 'idée et comme on est sur du très spécifique
Mais bon avec le fichier il est en français
Amicalement

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 24 Février 2020

• #4

Bonsour®
sur un site anglais une solution approchante (enveloppe convexe)

Convex hull

Convex hull bounding a scatter data series

www.andypope.info

voir aussi :

http://prodomosua.it/zips/2007/convexhullfunction.xlsb

 

Dernière édition: 24 Février 2020

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 25 Février 2020

• #5

bonsoir modeste geedee
en effet convexhull est une approche inintéressante
par contre convexhullfonction je n'arrive pas à le faire fonction de plus le code VBA est protégé
cordialement

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 25 Février 2020

• #6

Bonsoir le fil

Le code VBA du classeur : ConvexHull.xls n'est absolument pas protégé.
(fichier d'Andy Pope)
Et pour le second fichier:
Contactes l'auteur (par mail)

 

Dernière édition: 25 Février 2020

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 25 Février 2020

• #7

Bonjour staple1600
Je viens d envoyer un mail à l auteur
Néanmoins je viens de trouver un fichier qui devrait bien m'aider il faut juste le modifier et récupérer l enveloppe extérieur
Il y a néanmoins beaucoup de boulot
Amicalement

 

Pièces jointes

• IntersecPolygone.Zec (1).zip

  23.3 KB · Affichages: 8

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 26 Février 2020

• #8

Bonjour à tous,

En 'déformant' ton problème peut-être ?
Elimine chaque point de série 1 présent à l'intérieur de série 2.
Idem pour ceux de série2 dans série 1.
Il ne te restera que les points du polygone union.
Un fil pour ça : https://codes-sources.commentcamarche.net/forum/affich-10047416-tester-un-point-dans-un-polygone-vba
eric

 

Vote positif 0 Vote négatif

J

jmfmarques

XLDnaute Accro

• 26 Février 2020

• #9

Bonjour à tous
J'ai comme l'impression de ce que la discussion "glisse" lentement mais sûrement de ce qu'était la problématique exposée (assemblage) vers ce qu'elle est maintenant (intersection). 😵
Quelle est donc la volonté finalement retenue ?

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 26 Février 2020

• #10

... vers ce qu'elle est maintenant (intersection)

Cliquez pour agrandir...

Où vois-tu ça ? Je ne vois rien de tel.
eric

 

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 26 Février 2020

• #11

jmfmarques à dit:

Bonjour à tous
J'ai comme l'impression de ce que la discussion "glisse" lentement mais sûrement de ce qu'était la problématique exposée (assemblage) vers ce qu'elle est maintenant (intersection). 😵
Quelle est donc la volonté finalement retenue ?

Cliquez pour agrandir...

Bonjour jmf
Autant pour moi
Je reformule quand je fichier joint avec 2 polygone j en fait un seul.

 

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 26 Février 2020

• #12

eriiiic à dit:

Où vois-tu ça ? Je ne vois rien de tel.
eric

Cliquez pour agrandir...

Erreur pas d intersection.

 

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 26 Février 2020

• #13

Bonsoir j'ai vu une nouvelle approche que je partage
sa ressemble à sa mise à part que c'est l'enveloppe extérieur

 

Pièces jointes

• IntersecPolygone.xls

  79.5 KB · Affichages: 7

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 26 Février 2020

• #14

et le post #8 ne t'inspire pas ?

https://www.excel-downloads.com/threads/assemble-multiple-polygons.20041867/#post-20301731

 

Vote positif 0 Vote négatif

P

pastoche

XLDnaute Nouveau

• 26 Février 2020

• #15

Bonjour
J'ai regardé avec attention ce poste, mais au vu de ce que j ai testé, il ne gère pas les extensions en créant des points en plus
Regarde le fichier que j ai envoyé, il arrive a recréer les intersections et détermine un nouveau polygone.
A+

 

Vote positif 0 Vote négatif