IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

ouverture d'un ficher


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    12
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 12
    Par défaut ouverture d'un ficher
    Bonjour,

    Je souhaiterais ouvrir une mise en plan solidworks (fichier.slddrw) à l'aide d'une macro excel.
    Pour cela, je voudrais soit faire un copier coller du chemin dans une cellule d'un tableau Excel, soit choisir directement le fichier par une boite de dialogue...

    Le problème est que je n'y connais pas grand chose en programmation...

    Merci d'avance.

  2. #2
    Membre Expert Avatar de aalex_38
    Inscrit en
    Septembre 2007
    Messages
    1 631
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 631
    Par défaut
    Bonjour,

    - Déja il te faut un code pour lancer ton application.

    Un exemple à adapter a placer dans un module standard :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
    Sub test()
    rep = ShellExecute(0, "open", "c:\xxx\fichier.slddrw", vbNullString, vbNullString, 5)
    End Sub
    - Ensuite comment veux-tu ouvrir le fichier avec un bouton ?

    - Enfin un code pour choisir un chemin :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Dim mychemin As Variant 'Variant pour tester le code retour de la boite de dialogue
    ' +-----------------------------------------------------------------------+
    ' ! Ouverture de la boite de dialogue ouvrir pour choisir le chemin       !
    ' +-----------------------------------------------------------------------+
     mychemin = Application.GetOpenFilename("Tous les fichiers, *.*,Fichiers solid works , *.slddrw,Fichiers office, *.xls;*.doc;*.ppt,Fichiers Word , *.doc") 'fenetre pour selection du fichier
     If VarType(mychemin) = vbBoolean Then ' test si on ne selectionne pas de chemin
     Else
    ' Ici on peut utiliser mychemin pour ouvrir le fichier
     End If

  3. #3
    Membre habitué
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    12
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 12
    Par défaut
    tout d'abord merci d'être réactif, c'est pas le cas sur tout les forums...

    je ne sais pas trop comment expliquer de façon claire ce que je souhaite faire... alors je vais y aller par étape.

    - j'ai commencé par créer une "userform" avec des boutons. Le premier sert à choisir le fichier .slddrw à traiter. (Ton code me permets de le sélectionner comme dans l'explorateur... fabuleux !)

    - j'ai ensuite un second bouton qui me permets (ou plutot me permettra) de créer et d'exporter la nomenclature des pièces dessinées dans le fichier.slddrw au format Excel

    - j'ai un troisième bouton qui me permets de manipuler ma nomenclature (classement des pièces par catégorie puis envois vers différentes page)

    - et enfin un bouton "print"
    ...

    je ne veux donc pas "ouvrir" en temps que tel le fichier, mais je veux dire à ma macro "fait cette manip dans tel fichier"...

    si c'est toujours flou, je suis la pour répondre aux questions...

  4. #4
    Membre Expert Avatar de aalex_38
    Inscrit en
    Septembre 2007
    Messages
    1 631
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 631
    Par défaut
    Bonjour,

    - j'ai ensuite un second bouton qui me permets (ou plutot me permettra) de créer et d'exporter la nomenclature des pièces dessinées dans le fichier.slddrw au format Excel
    Je n'ai pas solidworks, donc il m'est difficile de répondre à ta demande, comment comptes-tu t'y prendre pour créer et exporter ta nomenclature ?
    Sais-tu le faire manuellement ?

Discussions similaires

  1. Question sur l'ouverture des fichers
    Par Flynet dans le forum C
    Réponses: 8
    Dernier message: 22/05/2011, 12h03
  2. vérification de l'ouverture d'un ficher
    Par zandru dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 26/06/2008, 11h57
  3. erreur à l'ouverture d'un ficher
    Par gwenc_hlan dans le forum Général Python
    Réponses: 9
    Dernier message: 03/04/2008, 13h02
  4. Ouverture d'un ficher
    Par randriamanana dans le forum ASP.NET
    Réponses: 19
    Dernier message: 16/11/2007, 15h24
  5. [VBA]Problème ouverture - copie fichers de plusieurs sources
    Par kullervo dans le forum Général VBA
    Réponses: 9
    Dernier message: 27/04/2007, 11h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo