Bouton de commande

Résolu

bonjour, voila mon problème:

depuis mon formulaire access je voudrai creer un bouton qui ouvre ma feuille bar sur excel comment puisse faire

je vous remerci d'avance pour m'avance sur se problème

12 réponses

  1. Contributeur

    bonjour,

    c'est quoi cette feuille bar?

    1. c'est la feuille dans excel que je voudrai ouvrir (la gestion du bar de l'association dont je suis responsable)

    2. Contributeur
      @10michel46

      Le but, c'est juste d'ouvrir un fichier Excel, et de laisser l'utilisateur l'utiliser?

  2. oui  tout en travaillant sur mon formulaire c'est de l'ouvrir pour effectuer des contrôle et de le refermer pour m'éviter de fermer mon formulaire et d'ouvrir excel.

    1. Contributeur

      ceci, par exemple, démarre excel et lui fait ouvrir un fichier qui se trouve dans le même dossier que la base de données.

      sub ouv_xl
      Call Shell("excel.exe " + CurrentProject.Path + "\totoa.xlsx")
      end sub
    2. @yg_be

      ne fonctionne pas:

      il marque erreur de compilation End Sub attendu

  3. qu'est ce que le module

    1. Contributeur

      Où avez-vous inséré le code?  C'est bien dans un module dans l'éditeur VBA, le VBE?

  4. oui dans l'éditeur VBA.

    1. Contributeur

      Que contient donc ce module, cette page dans l'éditeur VBA?

  5. Je cree un bouton sur le formulaire,et j'ouvre  le générateur de code

    Il m'indique 

    Private Sub commande130_click ()

    End Sub

    1. Contributeur

      Il faut alors ajouter ma suggestion entre ces deux lignes.

      Private Sub commande130_click ()
      Call Shell("excel.exe " + CurrentProject.Path + "\totoa.xlsx")
      End Sub
  6. Désolé npous ne trouvons pas:

    C:\Users\michou\documents\bar.XLSX

    1. Contributeur

      Le fichier se trouve ailleurs?

  7. C:\Users\Micho\Desktop . peut être le bon

    1. Contributeur

      as-tu essayé en mettant le chemin correct dans le code?

  8. Non je ne sest pas comment et ou l'incorporer.

    1. Contributeur
      Call Shell("excel.exe " + "C:\Users\Micho\Desktop\bar.xlsx")
  9. grand,grand merci ,le bouton fonctionne à merveille, encore mille fois merci.

    1. Contributeur

      avec plaisir!
      peux-tu alors marquer la discussion comme résolue?