Controle Q

Out of category
1

Bonjour,

A la fermeture du fichier Excel de ma famille de pièces je voudrais qu'il y est un controle Q automatique. Est  ce possible. Par avance Merci

2

Bonjour,

voici un code vba que j'avais trouvé sur le net qui valide les configuration dans solidworks, regardez si vous pouvez l'adapter à excel. 

Sub main()

    Dim swApp                       As SldWorks.SldWorks
    Dim swModel                     As SldWorks.ModelDoc2
    Dim swConfigMgr                 As SldWorks.ConfigurationManager
    Dim swConfig                    As SldWorks.Configuration
    Dim vConfigName                 As Variant
    Dim sSpecConfigNameArr(0)       As String
    Dim vSpecConfigNameArr          As Variant
    Dim dimValue                    As Variant
    Dim stnameConfig As String
   
    Set swApp = Application.SldWorks
    'on récupére le document actif
    Set swModel = swApp.ActiveDoc
    
    Set swConfigMgr = swModel.ConfigurationManager
    'on récupére la configuration active
    Set swConfig = swConfigMgr.ActiveConfiguration
    'on récupére de nom de la configation active
    stnameConfig = swConfig.Name
    'on récupére le nom de toutes les configurations
    vConfigNameArr = swModel.GetConfigurationNames
    'on boucle
    For Each vConfigName In vConfigNameArr
        'on affiche la configuration
        swModel.ShowConfiguration2 vConfigName
         'on force la reconstruction
        swModel.ForceRebuild3 False
       
    Next vConfigName
        
    'on affiche la configuration active avant le traitement
    swModel.ShowConfiguration2 stnameConfig
    'on force la reconstruction
    swModel.ForceRebuild3 False
    'on sauvegarde le document
    swModel.Save3 swSaveAsOptions_e.swSaveAsOptions_Silent, 0, 0
    
End Sub

 

2 « J'aime »
3

Bonjour,

Le code donné par notre ami ac cobra 427 me semble être un très bon exemple à adapter dans une macro Excel, celui-ci est à transformer en fonction qui devra être appelée avant la fermeture de Excel, pour cela voir https://forum.excel-pratique.com/excel/executer-une-macro-a-la-fermeture-de-mon-classeur-t31649.html.

Cordialement,

1 « J'aime »