VBA Excel pour envoi mail outlook

Roland_M

XLDnaute Barbatruc

• 19 Décembre 2016

• #46

re

mais non, il faut simplement voir les différences et adapter le code exemple ici
'Connexion(SSL): True=Utilisation SSL False=Pas d'utilisation SSL(par défaut) si le serveur en demande une sinon false
.Item("") = False
.Item("") = 10 'sec délai de connexion

avec gmail essaies de mettre True ici:
.Item("") = True

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 19 Décembre 2016

• #47

Malheureusement je me sens pas capable de faire se que tu m'as dit 🙁

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 19 Décembre 2016

• #48

re

dans le module> Mod3_EnvoyerMailDirectCDO, c'est à la ligne 42 !

tu as ceci : .Item("") = False
tu mets = True
.Item("") = True

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 19 Décembre 2016

• #49

Roland_M est-ce que on parle du même fichier, moi j'ai pas de module nommé Mod3_EnvoyerMailDirectCDO

Puis la ligne que tu me dis elle est en ligne numéro 30 du dernier fichier

Code:

            .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = "true"

Puis elle est déjà en = True.

Mais pour une condition différente, regarde :

Code:

        'Si votre serveur demande une connexion sûre (SSL)
        If [E14].Value <> "non" Then
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = "true"
        End If

De plus, en ligne 43, j'ai :

Code:

        'Pour ajouter une pièce jointe, un fichier, classeur, image etc.
        '.AddAttachment 'Chemin et nom complet du fichier à joindre

Comment on peut ajouer un bouton, sélectionner le fichier, comme tu as fait pour ton programme

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 19 Décembre 2016

• #50

re

non ce n'est pas mon fichier !
je parle du mien: EnvoiMail CDOsmtpHTML_2.xlsm

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 19 Décembre 2016

• #51

re

voir ton classeur modifié !

 

Pièces jointes

• EnvoiMail CDOsmtpHTML_3.xlsm

  66.4 KB · Affichages: 120

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 19 Décembre 2016

• #52

Ah d'accord, désolé...

J'ai bien modifié et ça fonctionne bien 🙂 c'est du top

Par contre y'a beaucoup de chose que j'utiliserai pas.

Tu penses qu'on peut l'alleger?

- Moi je veux un truc simple sans historique d'envois.
- paramétrer l'adresse email mot de passe, port etc
- choisir le destinataire avec l'objet, le message, choix de la pj.

Supprimer tout les autres onglets, puis alléger le code.

Tu penses que c'est possible?

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 19 Décembre 2016

• #53

re

bien entendu que c'est possible !
mais c'est le genre de chose qui ne peut se faire qu'en la présence de personnes ensembles sur l'ordi !
comme ça par échange de conversations ça le fait pas !
et puis tout est imbriqué il faudrait tout revoir, j'ai pas trop envie !

 

Vote positif 0 Vote négatif

R

RONIBO

XLDnaute Impliqué

• 19 Décembre 2016

• #54

Oui je suis d'accord avec toi, et je comprends, c'est pour ça que je souhaite utilisé le deuxième programme que tu m'as donné sur comment ca marche.

Il me restera plus qu'à intégrer les pièces jointes via un bouton

 

Vote positif 0 Vote négatif