Import de courbes d'Excel vers Solidworks [RESOLU]

vos questions concernant les API SolidWorks

Import de courbes d'Excel vers Solidworks [RESOLU]

Messagepar Agadoudou » Jeu 06 Mar 2014, 9:58

Bonjour,

Voici mon souci. J'ai plusieurs pièces a créer qui sont plutôt complexes et dont la base est une surface galbée dans les 3 plans...

J'ai en ma possession pour générer cette surface un tableau excel qui me génère toutes les courbes composant cette surface sous forme de fichiers .txt sur le bureau.

Il ne me manque plus que l'étape d'import en automatique vers Solid via VBA de toutes ces courbes.

En fait, il me faut juste importer autant de courbe que j'ai de fichiers .txt qui seront donc sur le bureau.

Les courbes sont toujours nommées pareil ("Courbe0" à "Courbe24" et de "CourbeA" à "CourbeJ")

Je pense que c'est vraiment pas compliqué mais j'ai rien trouvé et je ne connais pas les fonctions adéquats ... J'ai parcouru pas mal de Post sans voir un début de macro qui pourrait me rendre service ...

Un petit coup de main ???

Merci !!!!
Dernière édition par Agadoudou le Ven 07 Mar 2014, 9:52, édité 1 fois.
Merci à TOUS !!!!!
Agadoudou
Padawan SolidWorks
 
Messages: 79
Inscription: Ven 13 Avr 2012, 7:19
Localisation: Clermont Fd

Re: Import de courbes d'Excel vers Solidworks

Messagepar liryc » Jeu 06 Mar 2014, 13:55

Bonjour,
Il faut que tu utilises ce type d'appel de fonction:
Code: Tout sélectionner
boolstatus = swNewPart.InsertCurveFile(sFileName)

Avec sFilename correspondant au chemin d'accès du fichier txt.
Avec une boucle ça devrait rouler.
liryc
Chevalier Jedi SolidWorks
 
Messages: 479
Inscription: Ven 02 Mar 2007, 8:14
Localisation: Paris - SW2009 SP5.0

Re: Import de courbes d'Excel vers Solidworks

Messagepar Agadoudou » Jeu 06 Mar 2014, 14:52

Salut liryc !!!

euh... ça fait longtemps que j'ai pas fait ... donc j'ai du mal ...

Code: Tout sélectionner
 Dim swApp As Object
Sub Courbe()

Set swApp = Application.SldWorks

Dim boolstatus As Boolean


sFileName = "C:\Users\technicien.be\Desktop\courbe_1.txt"

boolstatus = swNewPart.InsertCurveFile(sFileName)

End Sub



Donc, évidemment ça bug ... Boolstatus = Faux .... (C'est quoi boolstatus ?)
Merci à TOUS !!!!!
Agadoudou
Padawan SolidWorks
 
Messages: 79
Inscription: Ven 13 Avr 2012, 7:19
Localisation: Clermont Fd

Re: Import de courbes d'Excel vers Solidworks

Messagepar tortilla2 » Jeu 06 Mar 2014, 16:28

Salut,

alors je ne l'ai jamais tenter mais je sais que c'est possible, via la fonction: courbe passant par des point XYZ, qui se trouve dans l'onglet fonction > Courbe

pour + d'info: http://help.solidworks.com/2012/French/SolidWorks/sldworks/HIDD_CURVE_IN_FILE.htm?id=8c8dc5580e034100a1602b70a73c0bc5#Pg0

un ptit extrait:

Ouvrez un fichier de courbe existant. Cliquez sur Parcourir et naviguez à la recherche d'un fichier de courbe à ouvrir. Vous pouvez ouvrir des fichiers .sldcrv ou des fichiers .txt qui utilisent le même format que des fichiers .sldcrv. Vous pouvez aussi créer des courbes 3D dans Microsoft Excel, par exemple, les enregistrer au format .txt, puis les ouvrir dans SolidWorks. Dans un éditeur de texte ou une feuille de calcul, créez un fichier contenant les valeurs des coordonnées pour les points de la courbe. Le format du fichier doit être une liste à trois colonnes de coordonnées X, Y et Z, délimitée par des tabulations ou des espaces. N'y ajoutez pas d'en-têtes de colonne (tels que X, Y et Z) ou autres.


Voila donc apparemment il va surement te falloir épurer ton fichier .txt
Avatar de l’utilisateur
tortilla2
Chevalier Jedi SolidWorks
 
Messages: 414
Inscription: Jeu 19 Jan 2012, 17:11
Localisation: Annemasse, Haute-Savoie (74)

Re: Import de courbes d'Excel vers Solidworks

Messagepar Agadoudou » Jeu 06 Mar 2014, 16:35

Merci, mais en fait, c'est l'étape qui consiste à aller chercher le fichier .txt (déjà créer et mis en forme) que je cherche à faire en VBA...

Pour chaque pièce j'ai 35 courbe et cette phase d'aller cliquer 35 fois sur parcourir en plus de choisir le format .txt a chaque fois et longue ...

Merci quand même.
Merci à TOUS !!!!!
Agadoudou
Padawan SolidWorks
 
Messages: 79
Inscription: Ven 13 Avr 2012, 7:19
Localisation: Clermont Fd

Re: Import de courbes d'Excel vers Solidworks

Messagepar liryc » Ven 07 Mar 2014, 9:47

Grosse louche:
Code: Tout sélectionner
Dim swApp As Object
Dim swNewPart As SldWorks.PartDoc
Dim boolstatus As Boolean

Sub main()
Set swApp = Application.SldWorks
Set swNewPart = swApp.ActiveDoc

sFileName = "C:\Users\technicien.be\Desktop\courbe_1.txt"
boolstatus = swNewPart.InsertCurveFile(sFileName)

End Sub
liryc
Chevalier Jedi SolidWorks
 
Messages: 479
Inscription: Ven 02 Mar 2007, 8:14
Localisation: Paris - SW2009 SP5.0

Re: Import de courbes d'Excel vers Solidworks

Messagepar Agadoudou » Ven 07 Mar 2014, 9:52

Merci mec !!!

C'est cool, ça fonctionne. A moi de faire maintenant la boucle qui va bien, mais ça, ça devrait aller ....

Bravo Liryc !
Merci à TOUS !!!!!
Agadoudou
Padawan SolidWorks
 
Messages: 79
Inscription: Ven 13 Avr 2012, 7:19
Localisation: Clermont Fd


Retourner vers Questions générales sur les API

 


  • Articles en relation
    Réponses
    Vus
    Dernier message

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 5 invités

banniere