jenuary
Guest
Merci ninos19
danimecc88
Guest
Bonjour, pour moi n'ajoute pas le rev malheureusement... m'aider à comprendre où cette valeur charge la macro? perhcè peut-être dans la déclaration de la variable il y a une certaine incongruité! Qu'est-ce que je dois vérifier ?
LordRochester
Guest
Bonjour, Dani.
Je l'examine comme propriété par défaut dans la partie. Dans mon cas, il est appelé "rev" et je l'ai mis avec la valeur "0.0".
Ma macro regarde la valeur de la propriété "rev" si elle existe et si elle est différente de 0.0 puis l'ajoute au nom du fichier généré.
au cas où vous voulez ajouter la propriété dans tous les fichiers, ici ils ont ajouté une macro très agréable, que vous devez personnaliser.
danimecc88
Guest
Je voudrais également prendre la valeur actuelle dans la boîte des propriétés des composants, qui pour moi est appelée révision, et l'insérer dans le nom de fichier exporté. ..peut-il être que la longueur définie du nom est insuffisante pour contenir tous les caractères? Je veux dire la corde :Bonjour, Dani.
Je l'examine comme propriété par défaut dans la partie. Dans mon cas, il est appelé "rev" et je l'ai mis avec la valeur "0.0".
Ma macro regarde la valeur de la propriété "rev" si elle existe et si elle est différente de 0.0 puis l'ajoute au nom du fichier généré.
au cas où vous voulez ajouter la propriété dans tous les fichiers, ici ils ont ajouté une macro très agréable, que vous devez personnaliser.
nom de fichier = strings.left(nom de fichier, len(nom de fichier) - 7)
danimecc88
Guest
Peut-être que j'ai compris pourquoi ça ne marche pas... nous avons des propriétés personnalisées dans un dossier sur nas alors que la macro va probablement prendre la valeur du dossier de solidworks localement. comment puis-je cartographier le bon fichier?Bonjour, Dani.
Je l'examine comme propriété par défaut dans la partie. Dans mon cas, il est appelé "rev" et je l'ai mis avec la valeur "0.0".
Ma macro regarde la valeur de la propriété "rev" si elle existe et si elle est différente de 0.0 puis l'ajoute au nom du fichier généré.
au cas où vous voulez ajouter la propriété dans tous les fichiers, ici ils ont ajouté une macro très agréable, que vous devez personnaliser.
jenuary
Guest
essayer de poser un fichier et une macro modifiés
LordRochester
Guest
essayez de partager une partie de fichier. parce que les propriétés relatives à chaque partie sont ou dans elle écrites.
LordRochester
Guest
le parti in herbeetto sono quelle che devi modificare, come si chiama la proprietà La révision nei tuoi fichier e come è il valore zéro che vuoi che non venda riportato nel nome. quella non è la lunghezza dei caratteri ma semplicimente annulla gli ultimi del filename, ovvero l'efforte.
_____________________________
option explicite
dim échange comme sldworks. Soldworks
dim swmodel comme sldworks.modeldoc2
dim swdraw comme sldworks.drawingdoc
Dim swview sous forme de sldworks. vue
Dim swmodelref comme sldworks.modeldoc2
dim getthinfo comme chaîne de caractères
dim swmodeldocext comme sldworks.modeldocextension
dim swexportdata en tant que sldworks.exportpdfdata
dim boolstatus en tant que booléen
dim boolstatuspdf sous forme de booléen
dim boolstatusdxf sous forme de booléen
Dim dessine comme chaîne
dim pdf comme chaîne de caractères
dim dxf comme chaîne de caractères
dim nom de fichier comme chaîne
des erreurs aussi longues
moins longtemps
dim révision en chaîne
DIM DESC comme chaîne de caractères
Sous-main()
définir swapp = application. Soldworks
swmodel = swap.activedoc 'contrôle de documents'
Si swmodel n'est rien alors
msgbox "no current document", vbcritic 'se è aperto un documento
fin
fin si
Si swmodel. gettype <> swdocdrawing puis 'se è di tipo messa in tavola
msgbox "cette macro ne fonctionne que sur des dessins", vbcritic
fin
fin si
ensemble swmodeldocext = swmodel.extension
set swexportdata = swap.getexportfiledata(swexportpdfdata)
'aazeramento delle variabili di check
boolstatus = faux
boolstatuspdf = faux
boolstatusdxf = faux
dxf = ""
pdf = ""
'recupera percorso e nome file consensione
nom de fichier = swmodel.getpathname
'controlla se è stato salvato
si nom de fichier = "" alors
msgbox "S'il vous plaît enregistrer le fichier d'abord et essayer à nouveau", vbcritic
fin
fin si
'save dessin / salva la messa in tavola
boolstatus = swexportdata.setsheets(swexportdata_exportallsheets, 1)
boolstatus = swmodeldocext.saveas(nom de fichier, 0, données swexport, erreurs, avertissements)
si boolstatus alors
tirage = "ok"
Autre
tirage = "échec"
fin si
'prende la propriété
set swdraw = swmodel
set swdraw = swdraw.getfirstview
set swview = swview.getnextview
set swmodelref = swview.referenceddocument
révision = swmodelref.getcustominfovalue("", "rev"
'vérifier si la variable rev est vide ou si elle est 0,0
nom de fichier = strings.left(nom de fichier, len(nom de fichier) - 7)
si révisé0,0et révision <>- Oui." et révision <> "
nom de fichier = nom de fichier & "_rev" & révision 'annexe de révision si pas rev 0.0
fin si
'enregistrer en pdf
nom de fichier = strings.left(nom de fichier, len(nom de fichier)) & ".pdf"
boolstatuspdf = swexportdata.setsheets(swexportdata_exportallsheets, 1)
boolstatuspdf = swmodeldocext.saveas(nom de fichier, 0, 0, données swexport, erreurs, avertissements)
si boolstatuspdf alors
pdf = "ok"
Autre
pdf = "échec"
fin si
'save comme dxf
nom de fichier = strings.left(nom de fichier, len(nom de fichier) - 3) & "dxf"
boolstatusdxf = swexportdata.setsheets(swexportdata_exportallsheets, 1)
boolstatusdxf = swmodeldocext.saveas(nom de fichier, 0, 0, données swexport, erreurs, avertissements)
si boolstatusdxf alors
dxf = "ok"
Autre
dxf = "échec"
fin si
'message statut sauvegardé
si boolstatus <> boolstatuspdf <> boolstatusdxf alors
msgbox "save all success" _
& vblf & "" _
& vblf & nom de fichier
Autre
msgbox "Enregistrer comme le dessin a échoué" _
& vblf & "" _
& vblf & "sw draw & #160;:" & draw _
& vblf & "pdf: " & pdf _
& vblf & "dxf:" & dxf _
& vblf & "" _
& vblf & "code de l'erreur:" & les erreurs _
& vblf & "" _
& vblf & nom de fichier
fin si
fin sous
danimecc88
Guest
Merci je vais essayer tout de suite, tandis que je voulais vous demander si vous pouvez me dire à partir de quel fichier et dans quel dossier la macro va lire la valeur de rev. J'imagine que c'est la propriété du document. Ayant défini un chemin de fichier différent de par défaut, l'ayant partagé sur des serveurs, cette macro suit cette modification ou la recherche dans les fichiers d'installation dans le répertoire local?
edo98
Guest
Bonjour.
Merci, J'ai découvert cette macro et j'ai pu résoudre certains problèmes et éviter des travaux inutiles.
Après quelques tests, je demande s'il est possible d'enregistrer tous les fichiers (ou seulement ceux sélectionnés dans une liste) présents dans un ensemble, sans avoir à les importer un à la fois dans la fenêtre appropriée.
Merci beaucoup.
salutations
Merci, J'ai découvert cette macro et j'ai pu résoudre certains problèmes et éviter des travaux inutiles.
Après quelques tests, je demande s'il est possible d'enregistrer tous les fichiers (ou seulement ceux sélectionnés dans une liste) présents dans un ensemble, sans avoir à les importer un à la fois dans la fenêtre appropriée.
Merci beaucoup.
salutations
jenuary
Guest
Non, il n'est pas possible, vous devez les choisir d'explorer les ressources en les téléchargeant dans la liste.
edo98
Guest
Très bien.
Merci pour la réponse.
s'il y a une mise à jour prévue, je pense qu'il serait intéressant d'intégrer cette fonction
Bepi1980
Guest
Merci beaucoup jenuary ....utile cette macro, avec un gain de temps considérable.
tanticapelli
Guest
Je le jette là... une macro comme cette combinaison modifiée pourrait exporter un fichier de dessin composé de plusieurs feuilles pdf séparées ayant chacune d'elles comme nom de fichier le nom de feuille?
Je ne sais pas si j'ai expliqué.
merci d'avance
tant de poils
Je ne sais pas si j'ai expliqué.
merci d'avance
tant de poils
jenuary
Guest
une macro devrait être créée pour se connecter à l'événement de sauvegarde de la table. pour enregistrer la macro export tout pdf unique selon vos demandes.
tanticapelli
Guest
Ah ici est intéressant, avant de prendre ma retraite alors je vais suivre un cours spécifique, toujours s'il y a encore une telle technologie.
Je vous remercie.
tant de poils
pierofox12
Guest
Bonjour à tout ce système de sauvetage pourrait être fait directement par l'axième ouvert? dans le sens apex et faire le sauvetage, m'enregistre tous les pdf avec le dvx des parties qui font partie de l'ensemble?
jenuary
Guest
Non, ça ne marche pas avec cette logique. est né pour toujours avoir mis à jour les fichiers à chaque sauvegarde indifféremment du type de fichier ouvert, vous avez également la possibilité d'exporter par lots une liste de fichiers. si vous liez une macro à l'événement de sauvetage des assemblées peut faire ce que vous demandez, mais la macro devrait être créée à partir de zéro. a des possibilités d'utilisation infinies en utilisant le lien vers les macros
jiji_akiko
Guest
Bonjour, Lorenzo.
vous avez essayé d'utiliser le paquet solide: "planification"; Il n'est pas automatique mais il suffit que vous sélectionnez les fichiers dont vous avez besoin et vous pouvez les convertir/copier dans le format que vous voulez, c'est un processus très rapide que nous utilisons dans le bureau où je suis.
Je vous donne un exemple de demande : Une fois que nous avons terminé tous les dessins (type 50 dessins), nous ouvrons le planificateur, nous sélectionnons le dossier avec tous les dessins, nous sélectionnons le format désiré (habituellement pdf) et le logiciel effectue tout automatiquement tout en travaillant sur d'autres.
vous avez essayé d'utiliser le paquet solide: "planification"; Il n'est pas automatique mais il suffit que vous sélectionnez les fichiers dont vous avez besoin et vous pouvez les convertir/copier dans le format que vous voulez, c'est un processus très rapide que nous utilisons dans le bureau où je suis.
Je vous donne un exemple de demande : Une fois que nous avons terminé tous les dessins (type 50 dessins), nous ouvrons le planificateur, nous sélectionnons le dossier avec tous les dessins, nous sélectionnons le format désiré (habituellement pdf) et le logiciel effectue tout automatiquement tout en travaillant sur d'autres.
Smoke87
Guest
montrer, pouvez-vous prendre un paramètre personnalisé et les faire faire les dossiers de destination basé sur cela? exemple de fichier d'une broche enregistrée comme centre de coûts de mécanisme, la table et il crée un dossier avec pdf et dwg de mécanismes?