Bonjour à tous, le Forum
J'ai dans une macro ce bout de code qui envoi automatiquement un mail dès lors qu'outlook est déjà ouvert. Mes questions sont les suivantes :
- est il possible d'envoyer ce mail par macro alors si Outlook n'est pas ouvert ? Si oui, qui peut me dire ce que je dois modifier dans le code (qui fonctionne très bien lorsqu'Outlook est déjà ouvert.) ?
- comment dois je faire pour contrôlé si outlook est déjà ouvert ? Et dans la négative, l'ouvrir (ensuite mon code fonctionne !)
Un grand merci par avance à tous ceux qui pourront m'aider.
Scoobidoo
J'ai dans une macro ce bout de code qui envoi automatiquement un mail dès lors qu'outlook est déjà ouvert. Mes questions sont les suivantes :
- est il possible d'envoyer ce mail par macro alors si Outlook n'est pas ouvert ? Si oui, qui peut me dire ce que je dois modifier dans le code (qui fonctionne très bien lorsqu'Outlook est déjà ouvert.) ?
- comment dois je faire pour contrôlé si outlook est déjà ouvert ? Et dans la négative, l'ouvrir (ensuite mon code fonctionne !)
Un grand merci par avance à tous ceux qui pourront m'aider.
Scoobidoo
Code:
Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)
'on envoi le mail par outlook aux destinataires sélectionnés
With olmail
Application.Visible = False
.To = ([EMAIL="a@free.fr"]a@free.fr[/EMAIL]) 'destinataires
.BCC = ([EMAIL="b@free.fr"]b@free.fr[/EMAIL]) 'En copie
.Subject = ("Essai") 'Objet
'Corps du message
.Body = "Bonjour," & Chr(10) & Chr(10) & "Ceci est un essai" & Chr(10) & Chr(10) & "Merci."
.Send 'on envoie
End With