envoyer fichier par mail avant de le fermer

[pascal21]

bonjour
j'ai essayé quelques codes trouvé ici mais je n'y arrive pas
je cherche le moyen d'envoyer une copie d'un classeur ou même une partie de ce classeur avant de quitter
le top serait que ça se fasse sans demande de confirmation
ceci afin de sécuriser la sauvegarde du classeur
une erreur étant de manip étant toujours possible sur le pc
merci

 

[La Vouivre]

Re : envoyer fichier par mail avant de le fermer

regarde si tu trouve ton bonheur

Sending mail from Excel with CDO

 

[pascal21]

Re : envoyer fichier par mail avant de le fermer

bonjour la vouivre (tiens on est presque voisin!!!)
je n'ai pas tout compris sur le lien proposé
mais il me semble qu'il faille installer un logiciel
ce n'est pas ce que je souhaite
en fait la machine où ce classeur sera destiné possède outlook et c'est tout à ma connaissance
si quelqu'un avait une idée j'en serais très heureux

 

[pascal21]

Re : envoyer fichier par mail avant de le fermer

 Sub EnvoieFichierJoint()
Dim Dest As String
Dim Sujet As String
Dest = "toto@laposte.net"
Sujet = "Test d'envoi d'email"
[COLOR=Red] ActiveWorkbook.SendMail Dest, Sujet, True[/COLOR]
End Sub

j'ai trouvé ce code mais ça butte sur la ligne en rouge en me disant que la méthode a échouée
je ne sais pas quoi y mettre
avez vous une idée

 

[La Vouivre]

Re : envoyer fichier par mail avant de le fermer

essaye avec le fichierde trouver un excemple qui te conviens ,je l'ai trouver sur le net