Enregistrer BOM assemblage en format excel avec une macro

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


generation_table_nomenclature.swp

Bonjour,

Regarde par ICI, tu devrais trouver ce que tu veux.

Cordialement,

merci d.roger

je ne maîtrise pas vraiment les macros sous solidworks.

J'ai essayer de modifier sans succès.j'ai une erreur de compilation

d'ou cela peut provenir?

 


generation_table_nomenclature.swp

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

Puis

Cordialement,

1 « J'aime »

Bonjour,

Voici ta macro (normalement) fonctionnelle.

Cordialement,


generation_table_nomenclature.swp
1 « J'aime »

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 

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

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

 Set swModel = swApp.ActiveDoc

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,

@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é?

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

 

 

 

 

Bonjour,

Ouvrez une nouvelle discussion en joignant la macro, et le tableau xls pilotant.

Plus de personnes pourront vous répondre

Cdlt

1 « J'aime »