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 :

Code pour l'envoi d'un email


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Juin 2007
    Messages
    250
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2007
    Messages : 250
    Par défaut Code pour l'envoi d'un email
    Bonjour,

    J'ai un formulaire principal (F_Abonne) et un sous formulaire (F_Coordonnees)

    Dans mon sous formulaire j'ai un bouton qui j'aimerai ouvre outlook et insère l'adresse email du destinataire

    ci dessous le code que j'ai mis sur le click du bouton :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.FollowHyperlink "mailto:" & Forms![F_Coordonnees]![EmailPerso]
    l'erreur c'est qu'il ne me trouve pas le sous formulaire

    Si quelqu'un peut m'aider,
    Merci d'avance
    Mamanhou

  2. #2
    Membre Expert Avatar de bernardmichel
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Janvier 2004
    Messages
    1 181
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Vaucluse (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Janvier 2004
    Messages : 1 181
    Par défaut
    Bonjour !

    Tu ne nommes pas ton sous-formulaire dans ta formule. Il te faut écrire un truc du genre :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.FollowHyperlink "mailto:" & Forms![F_Coordonnees]!MonSousForm.Form![EmailPerso]
    A+

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Juin 2007
    Messages
    250
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2007
    Messages : 250
    Par défaut
    Bonjour Bernard Michel,

    Cela ne fonctionne pas ....
    il ne trouve toujours pas le F_Coordonnees

    Un peu d'explication :
    J'ai un formulaire principal : F_Abonne
    Sur celui ci j'ai des boutons de commande qui m'ouvre les sous formulaires via un formulaire (sfmMonSousFormulaire)
    J'ai lié celui par les champs père et fils au formulaire principal.

    Code du bouton
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub cmdCoordonnees_Click()
    Dim strForm As String
     ' Nom du formulaire à afficher dans le contrôle sous-formulaire
    Me.sfmMonSousFormulaire.Visible = True
    strForm = "F_Coordonnees"
     ' Définir le formulaire à utiliser comme source du sous-formulaire
    Me.sfmMonSousFormulaire.SourceObject = strForm
    End Sub
    J'ai pris ce modèle dans un tuto du site car je ne voulais pas une présentation onglet.

    dans le code faut-il parler du formulaire "sfmMonSousFormulaire" ?

    Merci d'avance
    Mamanhou

  4. #4
    Membre Expert Avatar de bernardmichel
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Janvier 2004
    Messages
    1 181
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Vaucluse (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Janvier 2004
    Messages : 1 181
    Par défaut
    Pardon, j'avais mal lu ton post... désolé
    En prenant les noms énoncés dans ce post, le code devrait ressembler à ceci:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.FollowHyperlink "mailto:" & Forms!F_Abonne!F_Coordonnees.Form!EmailPerso
    Cela devrait fonctionner de cette façon...

    Si ce n'est pas le cas, comprimes ta base et joins-la à ta prochaine réponse, il y a peut-être encore quelque chose qui m'échappe ??

    Bonne soirée !

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Juin 2007
    Messages
    250
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2007
    Messages : 250
    Par défaut
    Bonjour,

    Cela ne marche pas il cherche toujours le F_Coordonnes...
    Ci joint, comme demandé, un bout de ma base pour vérifier le code

    Merci d'avance
    Mamanhou

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

    C'est normal, tu es déjà dans F_Coordonnees

    Essayes avec :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.FollowHyperlink "mailto:" & Me.[Email]
    Starec

  7. #7
    Membre expérimenté

    Profil pro
    Inscrit en
    Juin 2007
    Messages
    155
    Détails du profil
    Informations personnelles :
    Âge : 75
    Localisation : France

    Informations forums :
    Inscription : Juin 2007
    Messages : 155
    Par défaut
    Bonjour,

    La syntaxe pour invoquer un contrôle d'un sous-formulaire est :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Me.NomDuSousFormulaireEnTantQueContrôle.Form!NomDuContrôleDuSousFormulaire
    Il ne faut pas confondre le nom du sous-formulaire en tant que contrôle du formulaire principal et le nom du formulaire source qui alimente ce sous-formulaire.

    Donc ici il faut mettre :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.FollowHyperlink "mailto:" & Me.sfmMonSousFormulaire.Form!EmailPerso

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

Discussions similaires

  1. Code pour l'Envoi mail avec asp via outlook
    Par youça dans le forum ASP
    Réponses: 8
    Dernier message: 23/03/2015, 12h03
  2. Réponses: 3
    Dernier message: 21/01/2015, 09h03
  3. Récupérer les contacts d'une fichier Excel pour l'envoi d'un Email
    Par taureau dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 17/03/2011, 22h19
  4. [E-03] code pour mettre en forme un email ?
    Par Emily2711 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 26/02/2009, 11h51
  5. Code pour l'envoi d'un mail
    Par Z[ee]k dans le forum Access
    Réponses: 19
    Dernier message: 20/06/2006, 17h48

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