Re - Codification des corps soudés

Pour toutes nos pièces mécano soudées et nos pièces de tôleries, nous renommons systématiquement les corps soudées dans SolidWorks.

Cette codification est la suivante :   NOM FICHIERP00

00 les 2 derniers chiffres étant un compteur incrémental qui permet de différencier chacun des corps.

Exemples:

  • Pièce mécanosoudée

  • Pièce de Tolerie

Pour faire cela, c'est assez simple, nous utilisons l'utilitaire "Smartproperties", ça marche très bien.

(Nota pour cela que ça intéresse, je peux faire un p'tit TUTO)

Mon Problème:

Dans le cas où nous renommons une pièce existante mécanosoudée ou de Tolerie, je renomme ma pièce et donc nous sommes obligés d'en faire de même avec la liste de pièces soudées. Il nous faut alors refaire la manipulation du Smartproperties pour les corps soudés.

Dans ce cas bien précis (où la pièce renommée évolue en terme dedimension mais la forme ne change pas), nous cherchons une solution plus rapide et plus simple pour renommer les corps soudés.

A l'usage on s'apercoit que certains dessinateurs ne pensent pas à renommer les corps soudés.....

L'idée (là j'en appelle aux experts de la macro !!!) serait de créer une macro qui renomme automatiquement, (d'un simple clic....)  toute la liste des corps soudés.

Quelqu'un est-il capable de m'aider sur ce problème?

J'suis preneur, bien évidement, si quelqu'un a une autre idée.

 

Salut,

On peut voir un exemple dans l'aide de SolidWorks :

http://help.solidworks.com/2012/English/api/sldworksapi/Get_Solid_Bodies_from_Cut-list_Folders_and_Get_Custom_Properties_Example_VB.htm

La partie intéressante :

   If Not IsEmpty(vCustomPropNames) Then

        Dim NameFmt As String

        NameFmt = "!" & String(30, "@")

 

Une macro dans le même style est disponible ici :

https://forum.solidworks.com/thread/55341

 

Ou dans l'aide mais plus synthétique :

http://help.solidworks.com/2014/English/api/sldworksapi/Get_Custom_Properties_for_Cut-list_Item_Example_VB.htm

 

names = swCustPropMgr.GetNames

For Each name In names

    swCustPropMgr.Get2 name, textexp, evalval

    Debug.Print name, textexp, evalval, swCustPropMgr.GetType(name)

Next name

 

A adapter...

Et une autre macro (a priori qui renomme celle là) :

https://forum.solidworks.com/thread/47038

 

Merci @lucas

mais tout ça c'est du "chinois" pour moi !!!!!

Jamais fait de macro en VBA ?

Malheuresement non,

j'arrête pas de me dire qu'il faut que je m'y intéresse !!!!

mais j'ai pas trouvé le temps.

A essayer le 1er lien donne une macro qui devrait être foonctionnelle pour obtenir les noms.

Mais il faut bosser dessus pour pouvoir changer les noms.

Si tu veux t'initier au VBA regarde mes tutoriels, ils sont commentés à chaque ligne :

http://www.lynkoa.com/tutos/3d/macro-enregistrer-sous-avec-solidworks

http://www.lynkoa.com/tutos/3d/macro-solidworks-retirer-lecture-seule-pour-fichiers-de-bibliotheque

 

Et il y a peut-être des infos intéressantes dans cette macro :

http://www.leguide3d.com/profiles/blogs/api-solidworks-traversal-liste-des-pi-ces-soud-es

 

2 « J'aime »

Pour l'instant j'ai mis en standby ce "problème".

je m'en remets à la bonne volonté des dessinateurs pour qu'ils n'oublient pas de faire la manipulation qui depuis Smarproperties est ultra simple (il faut juste ne pas oublier de le faire !!!!) ......