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 :

VBA concatener une fonction shell ?


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Homme Profil pro
    Étudiant
    Inscrit en
    Février 2021
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 29
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2021
    Messages : 11
    Par défaut VBA concatener une fonction shell ?
    Bonjour,

    Après plusieurs recherches, je n'ai pas réussi à trouver une astuce à mon problème. J'essaye d'imbriquer une variable dans une fonction shell. L'objectif est d'ouvrir ma base de données access à partir de vba sans entrer le chemin. Pour ce faire, je me suis tourné vers la fonction shell en insérant la variable curdir qui affiche normalement le chemin du fichier actuel. Le premier commentaire avec la fonction shell fonctionne très bien mais j'utilise le chemin du fichier access que j'essaye d'éviter.
    Voici un aperçu de ce que ça donne.
    Si quelqu'un à une idée je suis preneur

    Nom : question.png
Affichages : 80
Taille : 13,6 Ko

  2. #2
    Expert confirmé Avatar de Patrice740
    Homme Profil pro
    Retraité
    Inscrit en
    Mars 2007
    Messages
    2 478
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 71
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Mars 2007
    Messages : 2 478
    Par défaut
    Bonjour,

    Avec :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Private Sub CommandButton1_Click()
    Dim commande$
      ChDir ThisWorkbook.Path
      commande = "C:\Program Files (x86)\Microsoft Office\office12\MSACCESS.EXE " & CurDir & "\Test.accdb"
      Shell commande, vbNormalFocus
    End Sub

  3. #3
    Membre averti
    Homme Profil pro
    Étudiant
    Inscrit en
    Février 2021
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 29
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2021
    Messages : 11
    Par défaut
    Merci Patrice pour votre réponse, ça fonctionne parfaitement maintenant

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [OFFICE VBA] Ecrire une fonction de décryptage
    Par Arkham46 dans le forum Défis
    Réponses: 16
    Dernier message: 23/11/2008, 20h22
  2. [VBA]Exécuter une commande Shell
    Par antoine46 dans le forum VBA Access
    Réponses: 4
    Dernier message: 16/04/2008, 08h07
  3. [VBA-E] Une fonction Excel dans une fonction VBA
    Par laloune dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 14/07/2006, 10h21
  4. [VBA]Atteindre une fonction dans un xla
    Par boosty dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 27/01/2006, 13h13
  5. [VBA] Executer une fonction en passant son nom en argument
    Par David Guyon dans le forum Access
    Réponses: 4
    Dernier message: 05/10/2005, 19h56

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