Expand IntroductionIntroduction
Expand AdministrationAdministration
Expand Interface utilisateurInterface utilisateur
Collapse Fonctions de base de SOLIDWORKSFonctions de base de SOLIDWORKS
Expand Migrer de la 2D à la 3DMigrer de la 2D à la 3D
Expand AssemblagesAssemblages
Expand CircuitWorksCircuitWorks
Expand ConfigurationsConfigurations
Expand SOLIDWORKS CostingSOLIDWORKS Costing
Expand Design CheckerDesign Checker
Expand Etudes de conception dans SOLIDWORKSEtudes de conception dans SOLIDWORKS
Expand Habillage et mises en planHabillage et mises en plan
Expand DFMXpressDFMXpress
Expand DriveWorksXpressDriveWorksXpress
Expand FloXpressFloXpress
Expand Echange de données SLDXMLEchange de données SLDXML
Expand Opérations d'import et d'exportOpérations d'import et d'export
Expand Affichage du modèleAffichage du modèle
Expand Conception de moulesConception de moules
Expand Etudes de mouvementEtudes de mouvement
Expand Pièces et fonctionsPièces et fonctions
Expand RoutageRoutage
Expand TôlerieTôlerie
Expand SimulationSimulation
Expand SimulationXpressSimulationXpress
Expand EsquisseEsquisse
Expand SOLIDWORKS MBDSOLIDWORKS MBD
Expand SOLIDWORKS UtilitiesSOLIDWORKS Utilities
Expand SOLIDWORKS SustainabilitySOLIDWORKS Sustainability
Expand TolérancementTolérancement
Expand TolAnalystTolAnalyst
Expand ToolboxToolbox
Expand Constructions soudéesConstructions soudées
Expand Workgroup PDMWorkgroup PDM
Expand DépannageDépannage
Glossaire
Masquer le sommaire

Création d'un modèle de macro SolidWorks

Un modèle de macro SOLIDWORKS est une macro SOLIDWORKS qui vous permet de spécifier les valeurs des paramètres lorsque vous la planifiez en tant que tâche personnalisée dans le Planificateur de tâches SOLIDWORKS. Il s'agit d'un fichier texte contenant généralement un code Visual Basic, des appels SolidWorks API et des noms de jetons. Lorsque vous planifiez d'exécuter un modèle de macro SolidWorks en tant que tâche personnalisée dans le Planificateur de tâches SolidWorks, vous spécifiez les valeurs des paramètres qui doivent remplacer les noms de jetons.

Les noms de jetons peuvent être des chaînes de texte ou des valeurs numériques. Ils ont le format suivant:

Type de paramètre Format du nom de jeton
Chaîne $$$<nom_jeton>$$$
Nombre ###<nom_jeton>###

Un modèle de macro SolidWorks doit avoir l'extension .swb.

Pour créer un modèle de macro:

  1. Ouvrez un nouveau fichier texte à l'aide du Blocs-notes de Windows, de Microsoft WordPad ou d'un autre éditeur de texte.
  2. Copiez une macro SolidWorks et collez-la dans le fichier texte.
    Reportez-vous aux Rubriques d'aide de SolidWorks API et des compléments pour des informations sur les fichiers macro de SolidWorks.
  3. Saisissez les noms de jetons à la place des paramètres dont vous souhaitez spécifier les valeurs. Par exemple:
    Code original: swApp.SetCurrentWorkingDirectory "c:\temp"
    Code modifié: swApp.SetCurrentWorkingDirectory $$$TASK_WORKING_DIR$$$
  4. Enregistrez le fichier texte avec l'extension .swb.
    Avant de planifier et d'exécuter le fichier de modèle de macro SolidWorks, créez-en une copie de sauvegarde ou stockez-le à un autre emplacement que le dossier de travail des tâches. Cliquez sur Affichage > Options > Options des tâches pour afficher le dossier de travail des tâches. Lorsqu'une tâche utilisant un modèle de macro SolidWorks est exécutée, le système crée une copie du modèle de macro et remplace les noms des jetons par les valeurs de paramètres spécifiées lors de la planification de la tâche. Le fichier est sauvegardé dans le dossier de travail des tâches sous le même nom que celui du modèle de macro SolidWorks original. Si celui-ci est stocké dans le dossier de travail des tâches, le système le remplace par le nouveau fichier.
    Le code suivant est un exemple de modèle de macro SolidWorks. Il ouvre un document de mise en plan SolidWorks et l'enregistre en tant que fichier DXF. Lorsque vous planifiez d'exécuter le modèle de macro en tant que tâche personnalisée dans le Planificateur de tâches SolidWorks, vous spécifiez les valeurs des paramètres qui doivent remplacer les noms de jetons : $$$TASK_WORKING_DIR$$$, $$$TASK_FILE_TYPE$$$, $$$TASK_FILEPATH_NAME$$$ et $$$TASK_FILE_NAME$$$. 
    Dim swApp As Object Dim swModel As Object Dim ret As Boolean Dim dummyRet As Long Dim longstatus As Long Dim errorFilePath As String Dim nErrors As Long Dim nWarnings as Long Sub main() errorFilePath = $$$TASK_WORKING_DIR$$$ + "\" + "swTaskScheduler.error" ErrorOut "Start logging any errors...", errorFilePath Set swApp = CreateObject("SldWorks.Application") swApp.SetCurrentWorkingDirectory $$$TASK_WORKING_DIR$$$ ' Determine type of document longstatus = 0 ' $$$TASK_FILE_TYPE$$$ is case-sensitive! You must enter SW_DRAWING_TYPE or SW_DRAWING_TYPE_OLD If ($$$TASK_FILE_TYPE$$$ = "SW_DRAWING_TYPE" OR $$$TASK_FILE_TYPE$$$ = "SW_DRAWING_TYPE_OLD") Then Set swModel = swApp.OpenDoc6 ($$$TASK_FILE_PATHNAME$$$, 3, 1, "", dummyRet, longstatus) ErrorOut "File is a drawing document.", errorFilePath Else ErrorOut "File is not a drawing document.", errorFilePath End If ret = True ' If document is read-only, locked, or view-only, then log an error If (longstatus And 2) Then ErrorOut "File is read-only.", errorFilePath ret = False ElseIf (longstatus And 4) Then ErrorOut "File is locked by another user.", errorFilePath ret = False ElseIf (longstatus And 512) Then ErrorOut "File is view-only.", errorFilePath ret = False End If ' Close the document if read-only, locked, or view-only If (ret = False) Then Set swModel = Nothing swApp.CloseDoc $$$TASK_FILE_NAME$$$ End If Set swModel = swApp.ActivateDoc ($$$TASK_FILE_NAME$$$) If Not swModel Is Nothing Then ' If document is a drawing, then... If ($$$TASK_FILE_TYPE$$$ = "SW_DRAWING_TYPE" OR $$$TASK_FILE_TYPE$$$ = "SW_DRAWING_TYPE_OLD") Then ' Strip off SolidWorks drawing file extension (.slddrw) ' and add DXF file extension (.dxf) sPathName = swModel.GetPathName sPathName = Left(sPathName, Len(sPathName) - 6) sPathName = sPathName + "dxf" ' Save as file as DXF bRet = swModel.SaveAs4(sPathName, swSaveAsCurrentVersion, swSaveAsOptions_Silent, nErrors, nWarnings) End If Else ErrorOut "Document was not or could not be opened.", errorFilePath End If ' Exit the SolidWorks software swApp.ExitApp Set swApp = Nothing End Sub Function ErrorOut(errorString As String, errorFilePath As String) Open errorFilePath For Append As #5 Print #5, errorString Close #5 End Function


Faire un commentaire sur cette rubrique

Tous les commentaires concernant la présentation, l'exactitude et l'exhaustivité de la documentation sont les bienvenus. Utilisez le formulaire ci-dessous pour faire parvenir vos commentaires et suggestions directement à notre équipe de documentation. Celle-ci ne peut pas répondre aux questions de support technique. Cliquez ici pour des informations sur le support technique.

* Requis

 
*Courriel:  
Sujet:   Commentaires sur les rubriques d'aide
Page:   Création d'un modèle de macro SolidWorks
*Commentaire:  
*   Je reconnais avoir pris connaissance et accepter par la présente la politique de confidentialité en vertu de laquelle mes données personnelles seront utilisées par Dassault Systèmes

Rubrique d'impression

Sélectionner l'étendue du contenu à imprimer :

x

La version du navigateur que vous utilisez est antérieure à Internet Explorer 7. Afin d'optimiser l'affichage, nous suggérons d'utiliser Internet Explorer 7 ou une version ultérieure.

 Ne plus afficher ce message
x

Version du contenu de l'aide sur le Web: SOLIDWORKS 2017 SP05

Pour désactiver l'aide sur le Web dans SOLIDWORKS et utiliser l'aide locale à la place, cliquez sur ? > Utiliser l'aide sur le Web de SOLIDWORKS.

Pour signaler tout problème rencontré avec l'interface ou la fonctionnalité de recherche de l'aide sur le Web, contactez votre support technique local. Pour faire part de vos commentaires sur des rubriques d'aide individuelles, utilisez le lien “Commentaires sur cette rubrique” sur la page de la rubrique concernée.

0.20.46