envoie d'email automatique

Question

Bonjour a tous
J'ai encore besoin de votre aide
Voila aujourd'hui mon fichier marche tres bien(enfin...pas si bien que ca)
L'envoie d'email se fait automatiquement à l'ouverture du fichier sous certaines conditions
(je fais ca avec la macro workbook_open())
Le pb c'est que l'utilisateur n'ouvrira pas tout le tps le fichier et donc le mail ne partira pas
Je voudrai savoir si c'est possible d'envoyer mon email s'en forcement ouvrir le fichier
Merci d'avance pour vos réponses

cs_DARKSIDIOUS · Answer

Quel est le rapport avec vb6 si tu fais du vba ???

Je déplace vers le bon forum.

dsimon45 · Answer

Desolé je debute et la notion de vb6 ou de vba je ne fais pas bien la difference

cs_MPi · Answer

Comment veux-tu que ton e-mail s'envoie si tu n'ouvres pas le fichier qui contient la macro pour envoyer ce mail ?

À moins qu'il ne manque des pièces au puzzle (?)

MPi

dsimon45 · Answer

Justement je demande si c'est possible

Apparemment ca ne l'est pas

cs_DARKSIDIOUS · Answer

Pour résumer, vb6 est le langage de microsoft pour faire des applications autonomes, vba est le langage pour word, excel, access, etc, et ne permet pas de faire des applications autonomes.

dsimon45 · Answer

d'accor merci 
alors en fait c'est du vba que je fais

pseudoOM · Answer

VBA c'est le langage de développement inclus dans Acces. VB6 c'est une des version de Visual Basic de visual studio.  

 pseudoOM

cs_MPi · Answer

Peut-être devrais-tu expliquer quel est ce mail ?
Est-ce un fichier attaché lié au programme Excel qui lance le mail ou un autre genre de mail qui pourrait être envoyé sans qu'Excel soit utilisé ???

MPi

dsimon45 · Answer

Ba a vrai dire aujourd'hui la macro que j'utilise pour envoyer le mail se trouve dans le fichiers excel..
Il n'y a pas de fichiers joint en fait je récupere le texte de certaine cellule du fichier et c'est ca qui constitue le corps du message
cet email est à envoyer tous les mois 
il sert à prevenir l'utilisateur qu'il est tant de mettre à jour le fichier 
et tant que la mise à jour n'est pas faite le mail est renvoyé
aujourd'hui le code du mail est :


Sub EnvoiUnMail()


Dim i As Long
i = 5 'le 5 correspond au mois de mai


Dim adresseMail As String
Dim sujet As String
Dim URLto As String
Dim MAI as string


Dim TouchesEnvoi(5) As String 'ce tableau me permet un envoie automatique du mail


TouchesEnvoi(0) = 2
TouchesEnvoi(1) = "^" & "{ENTER}"


Worksheets("Parametre").Select 
adresseMail = Range("d1") 'la cellule d1 contient l'adresse du destinataire 
sujet = Range("d2") 'cette cellule contient le sujet du message

If i = 5 Then
        MAI = Sheets("MAI 2007").Range("B3") & Sheets("MAI 2007").Range("B5") 
'les cellule b3 et b5 contienne le corps de message
        URLto = "mailto:" & adresseMail & "?subject=" & sujet & "&body=" & MAI
End If


ActiveWorkbook.FollowHyperlink Address:=URLto


Attendre 3
For i = 1 To TouchesEnvoi(0)
    SendKeys TouchesEnvoi(i), True
Next i
End Sub

Sub Attendre(Secondes As Integer)
' Cette procédure temporise pendant le nombre
' de secondes qu'on lui transmet en argument
Dim Début As Long, Fin As Long, Chrono As Long
Début = Timer
Fin = Début + Secondes
Do Until Timer >= Fin
    DoEvents
Loop
End Sub

Je ne sais si ce que je demande est possible.....
Donc avec ce code la macro se met en route à l'ouverture du fichier
moi je voudrais qu'elle se mette en route toute seule sans avoir forcément besoin d'ouvrir le fichier
voila j'espere avoir été clair n'hesite à me poser des question
merci

cs_MPi · Answer

As-tu essayé en utilisant le gestionnaire des tâches de Windows pour le démarrage de ton appli ?

Es-tu le seul utilisateur ? 
ou sinon, est-ce que les utilisateurs se servent d'Outlook (de Office) ? Peut-être pourrais-tu utiliser l'événement d'Outlook 
Private Sub Application_Reminder(ByVal Item As Object)

Je n'ai jamis essayé, mais je pense que si tu as un message de rappel dans le calendrier, cet événement est appelé. Tu pourrais alors démarrer l'application Excel en mode invisible, envoyer ton e-mail et fermer le tout ... simple supposition ...

MPi

Envoie d'email automatique

10 réponses

Votre réponse

Discussions similaires