Bnjour,
J'utilise une technique qui a l'air sympas, mais je n'arrive pas a l'appliquer...


On déclare dans le module VBE:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Public Function Mail(Ctrl As Control) 
 
'permet d'envoyer un mail simplement, avec du texte brut 
 
If Not (IsNull(Ctrl.Value) Or Ctrl.Value = "") Then 
Application.FollowHyperlink "mailto:" & Ctrl 
End If 
 
End Function
et sur notre bouton

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub CmdEmail_Click()
Mail email
End Sub
le champ contenant l'adresse mail s'appelle Email...

en cliquant sur le bouton, j'obtiens une erreur :
"erreur d'execution 13
Incompatibilité de type"...


ou est ce que je me trompe!!??

MERCI