Bonjour,
Le code suivant me permettait de générer l'envoi d'un e-mail :
Cela a toujours correctement fonctionné, mais plus depuis qu'on a dû m'installer Office 365.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 DoCmd.SendObject acSendNoObject, , acFormatHTML, _ Me.Av1.Column(1), Me.Av2.Column(1), , _ "TEL : " & Me.Nom, _ Me.DateAppel _ & vbCrLf & Me.HeureAppel _ & vbCrLf & vbCrLf & Me.Nom _ & vbCrLf & vbCrLf & Me.Tel _ & vbCrLf & Me.AutreTel _ & vbCrLf & vbCrLf & Me.Commentaires
(la ligne rouge est ok).
J'ai maintenant une erreur d'exécution '2046' : la commande ou l'action "EnvoyerObjet" n'est pas disponible pour l'instant.
Je précise travailler avec deux versions d'Office installée sur mon poste.
Avec le 365, de nombreuses fonctionnalités d'Access n'étaient pas accessibles immédiatement et j'avais une urgence de codage.
Je continue donc de travailler, pour Access, avec mon vieil Office 2010.
J'ai dans la vague idée que cela doit être une question de paramétrage de l'Office, mais je n'ai pas trouvé de réponse lors de ma recherche à ce sujet.
Quelqu'un aurait-il une piste que je pourrais creuser ?
Merci d'avance.
Bien à vous.
Partager