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 :

Ouvrir paint Avec vba


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2015
    Messages
    31
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 30
    Localisation : France, Manche (Basse Normandie)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2015
    Messages : 31
    Par défaut Ouvrir paint Avec vba
    bonjour,

    Je voudrais ouvrir le logiciel paint grâce à un bouton sur excel affecté à une macro mais mon code ne fonctionne pas, je ne comprend pas. Pouvez vous m'aider?

    Voici mon code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Sub ouverture_paint()
    ChDir "C:\ProgramData"
    Workbooks.Open Filename:="C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Accessories"
    End Sub
    Merci bien !!

  2. #2
    Expert confirmé

    Homme Profil pro
    Curieux
    Inscrit en
    Juillet 2012
    Messages
    5 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Juillet 2012
    Messages : 5 169
    Billets dans le blog
    5
    Par défaut
    Bonjour,

    regarde si ça marche chez toi

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub Paint()
     
    Shell ("C:\WINDOWS\system32\mspaint.exe")
     
    End Sub

  3. #3
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Tu fais plusieurs erreurs :

    Premièrement la méthode Open de Workbooks n'est pas faite pour ouvrir un programme mais un fichier dans Excel.
    Deuxièmement, "Accessories" n'est pas un programme mais un répertoire.
    Troisièmement, l'exécutable de Paint ne se trouve pas dans Accessoiries, c'est juste son raccourci qui s'y trouve. Le programme lui-même est dans un répertoire de Windows (pour Windows XP, c'est dans C:\Windows\System32).

    Je ne sais pas s'il est possible d'accéder directement à la bibliothèque d'ojets de Paint pour s'en servir "proprement".
    La seule solution que je vois pour l'ouvrir est d'utiliser un Shell

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Shell("C:\WINDOWS\SYSTEM32\MSPAINT.EXE", 1)
    A modifier en fonction de ta version de Windows suivant le répertoire où se trouve Paint.
    Prend aussi le temps d'aller dans l'aide VBA pour regarder les différentes possibilité du second paramètre de Shell.

  4. #4
    Membre averti
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2015
    Messages
    31
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 30
    Localisation : France, Manche (Basse Normandie)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2015
    Messages : 31
    Par défaut
    Merci pour vos messages, ces macros fonctionnent parfaitement !

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

Discussions similaires

  1. [XL-2003] Ouvrir un fichier excel avec vba
    Par Lardon dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 22/07/2019, 13h52
  2. Ouvrir .exe avec VBA
    Par Ririri31 dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 14/08/2013, 14h20
  3. Ouvrir differents fichiers Word avec VBA
    Par karina218 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 20/11/2007, 10h10
  4. Ouvrir un fichier word avec VBA Access
    Par alainb dans le forum VBA Access
    Réponses: 3
    Dernier message: 26/10/2007, 21h57
  5. Ouvrir un document Excel en READ ONLY (avec VBA)
    Par beegees dans le forum Access
    Réponses: 2
    Dernier message: 29/12/2004, 20h48

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