VBA: Foutmeldingen/waarschuwingen verwijderen

Hallo

Ik heb een klein probleem met mijn macro, het is dat het alle fout / waarschuwing berichten wanneer ik mijn foto's opslaat. Ik wil de foutmeldingen overslaan, enig advies?

Het macro bit dat opneemt en dat ik gebruik is de volgende:

Part.Extension.SaveAs pdfPathName, 0, 0, swExportPDFData, lErrors, lWarnings
Bij voorbaat dank!

Hallo

Voor afdrukken via PDF.swp (23 KB)

Ik voeg de macro toe die we gebruiken om PDF's te maken

Vertel me nog eens of het je heeft geholpen

Centor

1 like

Hallo en bedankt,

Maar helaas zijn de boodschappen van verschillende schalen nog steeds aanwezig :frowning:

Re

Uh, voor zover ik weet, verliest de release in PDF de schaal op basis van wat we thuis zagen

Aan de andere kant kun je het in DXF houden
Enregistre_DXF_echel_1-1.swp (34 kB)

Je hoeft alleen maar het pad te hernoemen waar je het wilt neerzetten

@dustin.cornu voeg indien mogelijk de volledige code toe om u zo goed mogelijk te helpen.
En ook een zeefdruk van het raam dat wordt weergegeven.

1 like

Gelijkstroom - 2.swp ( 65.5 KB)

Hallo

Hier is de volledige code. Dit is een molen die de plannen van alle onderdelen en subassemblages van ALL ACTIVE assemblies (1 voor 1) opent en opslaat in PDF en DXF onder de bestandsnaam + kleine wijziging (toevoeging van de index in het midden van de aanduiding).

Het is niet optimaal qua constructie maar werkt ^^! Ik neem het terug als ik het probleem van de = dialoogvensters heb opgelost>

Het werkt heel goed, behalve het dialoogvenster dat me stoort omdat ik elke keer voor de pc moet blijven om te bevestigen

Bij voorbaat dank

Ok ik begrijp het beter met het raam^tre.
Het lijkt mij dat we de optie Stil moeten toevoegen:
https://help.solidworks.com/2017/English/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.IModelDocExtension~SaveAs.html
De link naar de optie:
https://help.solidworks.com/2017/English/api/swconst/SOLIDWORKS.Interop.swconst~SOLIDWORKS.Interop.swconst.swSaveAsOptions_e.html
En een voorbeeld in stap, maar het verandert niets aan het principe:
https://help.solidworks.com/2017/English/api/sldworksapi/Import_STEP_File_Example_VB.htm

3 likes

Hallo;

Ik gebruik de functie " SaveAs2 " voor een relatief vergelijkbare macro:

waarde = instantie. SaveAs2(NewName, SaveAsVersion, SaveAsCopy, Silent)

SaveAs2 Method (IModelDoc2) body {zichtbaarheid: hidden}

daarom...
Part.SaveAs2 NewFilePath & ".  DWG ", 0, Waar, Onwaar
en
Part.SaveAs2 NewFilePath & " .PDF ", 0, True, False

Ik zal eraan toevoegen dat mijn instellingen voor de opties "Opslaan als: DWG" zijn:
image

Vriendelijke groeten.

2 likes

Het werkt ^^! Heel erg bedankt <3 Ik wist niets van deze optie!!