Aller au contenu

Programmation macro


Messages recommandés

Posté(e)

Je cherche le moyen de faire une macro qui me premettrai dans une mise en plan de placer les trait dans différent calques, suivant une varible type mot clé par exmple

 

L'idée on clique sur la marco et elle scan toutes les variable et places les trait via "selcetionner comme arretes et va les placer dans le calque qui fait

 

Alors je n'y connais rien du tout en macro et je cherche une ame charitable pour m'aider

 

Merci

 

 

 

 

 

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

En fait je ne sais pas trop

 

En fait sur inventor j'ai autant de calque que mes copains d'autocad .... en 1 mot mon plan doit être identique à un plan autocad.

 

Or mes petits copains d'autocad vont mettre le metal dans le calque metal qui est en cyan et d'une épaisseur de 0.05 mm

Voila et ça pour tout le reste donc moi je galère a placer tout dans les calques tout les 4 matins

 

Donc je me disait si les ipt des pièces avec un classification ( que je fait déja pour ma nommencalture) genre dans les ipropriétées :

 

catégorie => métal

 

On pourrai avoir une macro qui reprend ca et scan l'asm dans un plan et me place tout les trait au bon endroit

 

voila simple mais vois pas bien comment faire

 

a+

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

A l'heure actuelle, comment procèdes-tu ? Tu modifie tes calques dans Inventor ou dans Autocad ?

Si c'est dans Inventor, sélectionnes-tu tous les traits d'une pièce ou bien détailles-tu par type de trait (Visible, caché, axes....) et ce pour chaque pièce ?

A priori, c'est du faisable en VBA

 

Thomas

Posté(e)

En effet mon gabarit DWG inventor vient d'une base autocad pour reprendre tout les calques, ensuite dans chaque vue je selectionne les pièces qui m'interrsesse et clik droit et selctionner en tant qu'arrêtre et je place le tout dans le bon calque.

 

et ca pour chaque vue..........................

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

Le problème c'est qu'a chaque mise à jour inventor replace les trait suivant la norme donc on recommence donc un petit bouton ça serai l'idéale

 

 

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

Merci de ton aide

 

pourrai tu me transmettre ton essai afin que je puisse être guidé

 

Mail : mikel.pesquer@9online.fr

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

Je n'ai rien gardé, mais tu peux procéder ainsi :

- ouvre l'éditeur VBA (Menu Outils > Macro > Editeur)

- dans un module (ex : module1), tu colles le programme récupéré sur le forum

- dans ton gabarit de dessin, tu créé de nouveaux calques avec les noms souhaités ("Metal",...)

- Dans chacune de tes pièces (et peux-être dans les assemblages, je n'ai pas vérifié), tu rajoutes une propriété DLAYER contenant le nom du calque souhaité. (note : DLAYER est un nom arbitraire. Tu peux le changer dans la macro et en mettre un qui te parle plus.)

-Lorsque tu es dans ton dessin, tu execute la macro DrawingSetPartLayersToDLAYER

 

Voilà !

 

Thomas

Posté(e)

J'ai trouvé merci je te tiens au courant bon WE

 

Et merci bcp

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

Salut

 

J'ai essayé mais quand j'execute la macro sur 1 seule pièce rien ne ce passe

 

Je creé un variable perso DLAYER (texte) dans les ipropriétées et lui donne le nom du calque

 

ensuite sur un plan (dwg ou idw ??) pour moi dwg j'execute la macro mais la rien ne ce passe

 

ce que j'ai remarque c'est que dans f(x) la variable avait une valeur ??? et pas du texte

 

Si tu vois ou je me suis trompé

 

 

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Posté(e)

Salut ,

 

Merci pour les fichiers, j'ai testé tous ça et ça marche, je ne comprend pas très bien pourquoi ta macro fonctionne et pas la mienne mais bons ça marche. Donc maintenant mes collègues me regarde rien faire parce qu c'est hyper lon quand je lance ça sur un de mes plan

 

NB : vue metre 2807/593

 

10 vue à mettre à jour :exclam:

 

merci

Mikel

INVENTOR 2011 suite - xp 32 - 4 Go ( <acronym class=dict title=)

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité