VBA : Suppression messages d'erreur/avertissements

Bonjour,

J’ai un ptit probleme avec ma macro, c’est qu’elle affiche tous les messages d’erreurs/avertissement lorsque j’enregistre mes plans. Je voudrais faire sauter les messages d’erreur, des conseils ?

Le bout de macro qui enregistre et que j’utilise et la suivante :

Part.Extension.SaveAs pdfPathName, 0, 0, swExportPDFData, lErrors, lWarnings
Merci d’avance!

Bonjour,

Pour Impression PDF.swp (23 Ko)

Je te joint la macro que nous utilisons pour faire des PDF

Redit moi si sa ta aidé

Centor

1 « J'aime »

Bonjour et merci,

Mais malheureusement les messages d’echelles qui differents est tjr présent :frowning:

Re,

Heu d’apres ce que je sais la sorti en PDF perd l’echelle selon ce que nous avons vu chez nous

Par contre en DXF on peut la conserver
Enregistre_DXF_echel_1-1.swp (34 Ko)

faudra juste renommé le chemin ou tu veux le deposé

@dustin.cornu merci de joindre le code complet si possible afin de t’aider au mieux.
Et aussi un imprime écran de la fenêtre qui s’affiche.

1 « J'aime »

DC - moulinette2.swp (65,5 Ko)

Bonjour,

Voici le code complet. Il s’agit d’une moulinette qui va ouvrir les plans de tout les pièces et sous-assemblage de TOUT les assemblages ACTIFS (1 par 1) et les enregistrer en PDF et DXF sous le nom de fichier + petit modification (ajout de l’indice au millieu de la désignation).

il n’est optimal en terme de construction mais marche ^^ ! je le reprendrais quand j’aurais corrigé le problème des boites de dialogue =>

Elle marche très bien si ce n’est les boite de dialogue qui m’embête car je dois rester devant le PC pour confirmer a chaque fois

Merci d’avance

Ok je comprends mieux avec la fen^tre.
Il me semble qu’il faut ajouter l’option Silent:
https://help.solidworks.com/2017/English/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.IModelDocExtension~SaveAs.html
Le lien vers l’option:
https://help.solidworks.com/2017/English/api/swconst/SOLIDWORKS.Interop.swconst~SOLIDWORKS.Interop.swconst.swSaveAsOptions_e.html
Et un exemple en step mais cela ne change pas le principe:
https://help.solidworks.com/2017/English/api/sldworksapi/Import_STEP_File_Example_VB.htm

3 « J'aime »

Bonjour;

J’utilise la fonction « SaveAs2 » pour une macro relativement similaire :

value = instance.SaveAs2(NewName, SaveAsVersion, SaveAsCopy, Silent)

SaveAs2 Method (IModelDoc2) body {visibility: hidden}

donc…
Part.SaveAs2 NewFilePath & « .DWG », 0, True, False
et
Part.SaveAs2 NewFilePath & « .PDF », 0, True, False

J’ajouterai que mes réglages des options de "Enregistrer sous : DWG sont:
image

Cordialement.

2 « J'aime »

Ca marche ^^ ! Merci beaucoup <3 je ne connaissais pas cette option !!