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

VBA Access Discussion :

Comment exécuter un module Access


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Femme Profil pro
    Administrateur de base de données
    Inscrit en
    Octobre 2007
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Service public

    Informations forums :
    Inscription : Octobre 2007
    Messages : 9
    Par défaut Comment exécuter un module Access
    Bonjour, j'ai créer un module sous access, je souhaite savoir comment executer ce module par l'intermédiare d'un bouton de commande dans un formulaire. Si quelqu'un connait la réponse, je le remercie par avance.

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 682
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 682
    Par défaut
    bjr,
    plusieurs possibilités selon que le module en question est une fonction ou une procédure

    ou
    devraient faire l'affaire.

    edit : les parametres peuvent être passés sans soucis avec les 2 formules.
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Citation Envoyé par sousae Voir le message
    Bonjour, j'ai créer un module sous access, je souhaite savoir comment executer ce module par l'intermédiare d'un bouton de commande dans un formulaire. Si quelqu'un connait la réponse, je le remercie par avance.
    Attention aux définitions des noms que tu emplois.
    Sous Access un module est composé de procédures et de fonctions.

    Starec

  4. #4
    Membre averti
    Femme Profil pro
    Administrateur de base de données
    Inscrit en
    Octobre 2007
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France

    Informations professionnelles :
    Activité : Administrateur de base de données
    Secteur : Service public

    Informations forums :
    Inscription : Octobre 2007
    Messages : 9
    Par défaut
    Re, j'explique, je dois faire un mailling vers plusieurs personnes et voici ce que j'ai fait :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    Public Sub Mailling()
      Dim ListeEmail As Recordset
      Set ListeEmail = CurrentDb.OpenRecordset("R_EMailOui")
      ListeEmail.MoveFirst
      ListeComplete = ""
      While Not ListeEmail.EOF
        ListeComplete = ListeComplete & ListeEmail("Email") & ";"
        ListeEmail.MoveNext
      Wend
      ListeComplete = Left(ListeComplete, Len(ListeComplete) - 1)
      ListeEmail.Close
      Set ListeEmail = Nothing
      Dim MonOutlook As Object
      Dim MonMessage As Object
      Set MonOutlook = CreateObject("Outlook.application")
      Set MonMessage = MonOutlook.createitem(0)
      MonMessage.to = ListeComplete
      MonMessage.Subject = "Petit essai de mailling"
      Corps = "Voici un test de message pour ma liste de diffusion de différents réseaux"
      MonMessage.Body = Corps
    MonMessage.send
    Set MonOutlook = Nothing
    End Sub
    Ca fonctionne, mais maintenant je souhaite à partir d'un formulaire "un bouton de commande" l'exécuter. Comment faire ?

    Merci de votre aide et merci de vos réponse.

  5. #5
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 682
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 682
    Par défaut
    dans l'évènement clic du bouton souhaité, mettre la ligne suivante

    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

Discussions similaires

  1. Réponses: 1
    Dernier message: 23/03/2013, 06h09
  2. Comment exécuter une base Access avec clic Bouton ?
    Par quanou dans le forum Windows Forms
    Réponses: 4
    Dernier message: 18/12/2008, 14h25
  3. [VBA] Exécuter un module provenant d'Access à partir d'Excel
    Par LordTal dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 23/04/2007, 19h37
  4. Réponses: 2
    Dernier message: 18/12/2006, 15h09
  5. [VBA-E][Access] Exécuter un module Access dans Excel
    Par Amara dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 28/03/2006, 09h42

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