Envoi mail VBA sur office 2007 ou 2010 32 bits / 64 bits
Bonjour,
Je rencontre actuellement un problème que je n'arrive pas à résoudre.
Action à réaliser : macro vba d'envoie d'un mail
Version d'office : 2007 32 bits, 2010 32bits, 2010 64 bits
Le code ci dessous fonctionne en 32 bits, mais pas en 64 bits, ça bloque sur la ligne "With ActiveSheet.MailEnvelope"
Sub Send_Mail_IT()
'Selection de la zone de cellule à envoyer par email
ActiveSheet.Range("A1:J43").Select
'On n'affiche pas le mail
ActiveWorkbook.EnvelopeVisible = False
'on sauvegarde automatiquement
ThisWorkbook.Save
'Options du mail, (objet, introduction, @mail, @mail cc, sujet, etc.. et la fonction SEND)
With ActiveSheet.MailEnvelope
.Item.To = "adresse@mail.1.com"
.Item.Cc = "adresse@mail.2.com"
.Item.Subject = "Mail du " & ActiveSheet.Range("N2").Value 'M2 = date, saisi dans une cellule par l'utilisateur
.Item.Send
End With
Range("N2").Select
MsgBox "Mail du " & Range("N2").Value & " envoyé" & Chr(10) & "Fichier enregistré"
End Sub
Au final, je souhaiterais soit :
• 1 seul bouton pour la version 32 bits / 64 bits + modification du script.
• 2 bouton, un pour le 32 bits, et un pour le 64 bits, donc deux scripts.
Je n'arrive pas à trouver une solution à ce problème de version.
Si vous avez des idées je suis preneur
Merci d'avance
Bonjour Ciril,
Si tu as office, tu dois avoir Outlook ?
Pourquoi ne pas utiliser une instance du logiciel ?
De nombreux sujets existent, cherche : vba excel envoi mail outlook
A+
Bonjour,
Merci d'avoir pris le temps de répondre.
J'ai bien outlook d'installer. Par office, je parlais de la suite office complète
Le script vba que j'utilise fonctionne bien avec outlook (outlook 2007 et 2010, en 32 bits).
Mais il ne fonctionne pas avec outlook 2010 64 BITS.
J'essai de trouver une solution pour exécuter un script quand il est lancé sur un excel 64 bits, et un autre script sur un excel 32 bits...
je suis toujours ce problème.