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:

---

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

Bonjour !

Tu ne nommes pas ton sous-formulaire dans ta formule. Il te faut écrire un truc du genre :

Code:

---

Application.FollowHyperlink "mailto:" & Forms![F_Coordonnees]!MonSousForm.Form![EmailPerso]

---

A+

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:

---

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

Pardon, j'avais mal lu ton post... désolé :oops:
En prenant les noms énoncés dans ce post, le code devrait ressembler à ceci:

Code:

---

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 !

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

Bonjour

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

Essayes avec :

Code:

---

Application.FollowHyperlink "mailto:" & Me.[Email]

---

Starec

Bonjour,

La syntaxe pour invoquer un contrôle d'un sous-formulaire est :

Code:

---

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:

---

Application.FollowHyperlink "mailto:" & Me.sfmMonSousFormulaire.Form!EmailPerso

---

Bonjour,
Tout d'abord merci à vous deux
La solution de starec fonctionne... par contre celle d'alain ne marche pas.

J'ai encore appris quelque chose aujourd'hui....super
Mamanhou

Pardon, je n'avais pas saisi que ton bouton se trouvait déjà dans le sous-formulaire.