Lynkoa

Enregistrer BOM assemblage en format excel avec une macro
  • Topic:
    • SOLIDWORKS

  • 11 answers
  • 1176 views

By YP69 The 13 May 2020

Bonjour

J'utilise une macro pour générer une table (trouvée sur le net).

je cherche a enregistrer une nomenclature en format xls , sur mon local ( C:\ par exemple ) depuis le fichier assemblage via une macro .

Auriez vous une idée du code ?

Merci d'avance de vos retours

 

Yannick

Best Answer

Other answers

d.roger | 25999 point(s)

Il te manque la référence à "Microsoft Excel xx.0 Object Library".

Puis

Cordialement,

YP69 | 8015 point(s)

Bonsoir 

D.roger merci pour ton retour. J aurais accès à solidworks  lundi.

Petite question, est t il  possible comme dans excel de supprimer une ligne à la BOM via une macro ?

Les Conditions pour  supprimer la ligne seraient qu il n y aient pas de valeur dans une case   d'une colonne spécifique. 

 

Merci

Bonne soirée 

YP69 | 8015 point(s)

Bonjour D.roger.

Je viens de tester ta macro.Elle fonctionne parfaitement.

J'ai ajouté un tri sur la colonne F, cellule renseignée en premier et vide après .

ensuite suppression des lignes contenant les cellules vides.

Merci.

 

yannick

Anes Kerkeni | 160 point(s)

Bonjour, je viens de tester la macro mais ca ne fonctionne pas.

 Set swModel = swApp.ActiveDoc

d.roger | 25999 point(s)

Bonjour Anes Kerkeni,

Est-ce possible d'avoir un peu plus de détail car avec autant d'information ça va pas être facile de deviner pourquoi cette macro ne fonctionne soi-disant pas !!!

Cordialement,

sbadenis | 21717 point(s)

@Anes Kerkeni  il serait préférable de donner plus d'explication. tu lance bien la macro depuis un assemblage? Tu as modifier quelques lignes,

Et le mieux est d'ouvrir un nouveau sujet et de mettre en référence le précédent (lien vers le sujet).

As-tu bien ajouteé le lien vers MS EXCEL comme demandé?

yve | 933 point(s)

Bonjour,

Je suis interessé par cette macro mais j'aimerais la modifier pour qu'elle utilise une modèle excel dans lequelle j'ai paramétré certaines choses (macro qui permet de modifier les propriétées dans SW, liste de choix déroulants)

j'imagine que la section à modifier est la suivante,

Dim wbk                     As Excel.Workbook

 

ou

 

' On ouvre un nouvel objet Excel
    Set xlApp = New Excel.Application
    
    ' On rend Excel visible avec un nouveau classeur
    With xlApp
        .Visible = True
        Set wbk = .Workbooks.Add
        Set sht = wbk.ActiveSheet
    End With

 

mais je ne sais pas comment indiquer le chemin de mon modèle xls

Merci de votre aide