Création Graphique

[doice]

Bonjour,

Afin d'aider mon mari qui fait du tournage sur bois, j'ai commencé à développer une petite application qui lui permet de connaitre les dimensions des segments de bois qu'il doit préparer pour réaliser ses créations.

J'aimerai savoir s'il y a moyen que je lui réalise une mise en plan graphique de ces segments?

Ce sont des trapèzes dont j'ai estimé les dimensions dans le tableau ci joint

Je vous remercie par avance de votre attention et de votre aide.

Merci bien Chantal

 

[sousou]

Re : Création Graphique

Bonjour

Peux-tu préciser par l'exemple ce que tu appels une mise en plan graphique?

 

[doice]

Re : Création Graphique

Bonjour,

J'aurai du préciser ma demande avec un petit croquis

je souhaiterai pouvoir représenter les trapèzes à l'échelle sur une nouvelle feuille

en sachant que mon tableau me donne les valeurs de la grande base, de la petite base ainsi que la hauteur.

si vous pouviez me donner un exemple pour un premier trapèze, je me debrouillerai pour la suite
dans le fichier , j'ai un angle de 22,5°
une grande base de 132,5mm
une petite base de 91,8mm
et
une hauteur de 49,1mm
pour le premier trapèze.

Merci de votre attention

 

[doice]

Re : Création Graphique

J'ai trouvé un début de piste avec ce type de code

Dim triArray(1 To 5, 1 To 2) As Single
triArray(1, 1) = 100
triArray(1, 2) = 200
triArray(2, 1) = 100
triArray(2, 2) = 100
triArray(3, 1) = 500
triArray(3, 2) = 100
triArray(4, 1) = 500
triArray(4, 2) = 200
triArray(5, 1) = 100 ' Last point has same coordinates as first
triArray(5, 2) = 200
Set myDocument = Worksheets(1)

mais je cherche pour la mise à l'echelle.

 

[sousou]

Re : Création Graphique

Re
Pas certain que c'est ce que tu veux, mais un exemple de dessins calculés avec tes données
A vérifié une éventuelle erreur de trigo
Doubleclick sur les cellule couche et dessins dans feuil 2

A adapter à tes besoins

 

[doice]

Re : Création Graphique

Bonsoir,
Merci
les dessins s'affiche bien petit, je pense qu'ils s'affichent en pixel et non en mm
mais je regarderai le code que tu as mis
Merci

 

[sousou]

Re : Création Graphique

Bonjour
Effectivement le dessin est fait en pixel, il faut ajouter un rapport Pixel,mm, mais celui ci sera fonction de l'écran et ou de l'impression

 

[doice]

Re : Création Graphique

ok,
Merci