Send Hotmail Live email with Excel VBA












0














I would to send an email with VBA. My provider is: Hotmail Live. In the mail settings the SMTP server name is: smtp.office365.com with the port: 587.



Sub SendEmailLive()

Dim mail As New Message

Dim Config As Configuration
Set Config = mail.Configuration

Config(cdoSendUsingMethod) = cdoSendUsingPort
Config(cdoSMTPServer) = "smtp.office365.com"
Config(cdoSMTPServerPort) = 587
Config(cdoSMTPAuthenticate) = cdoBasic
Config(cdoSMTPUseSSL) = True
Config(cdoSendUserName) = "mymail@live.it"
Config(cdoSendPassword) = "mailpassword"
Config.Fields.Update

mail.Configuration = Config

mail.To = "to_mail@gmail.com"
mail.From = "mymail@live.it"
mail.Subject = "Mail test"
mail.HTMLBody = "This is a text"

mail.Send
MsgBox "Sent"

End Sub



The error is: The transport failed to connect to the server




And the debug stops on mail.Send










share|improve this question
























  • Maybe the last answer at the bottom of this post can help: stackoverflow.com/questions/1814553/…
    – Kubie
    Nov 12 '18 at 19:02










  • I tried to use localhost as a server but it returns the same error
    – Ticras
    Nov 12 '18 at 19:12










  • Not sure if it make a difference but try Config.Fields.Item(cdo…) = instead of Config(cdo…) =. And make sure that there are no strange characters in your password that VBA cannot use properly.
    – Pᴇʜ
    Nov 13 '18 at 9:20












  • Unfortunately I tested the two suggestions but neither resolves
    – Ticras
    Nov 13 '18 at 9:47










  • Code looks fine and I don't think this is a programming issue since you get an error message that connection to the server failed. This should be an issue with the server parameters or user credentials. Check again if your user login credentials are correct. Check if your or your company's firewall blocks your traffic.
    – Pᴇʜ
    Nov 13 '18 at 11:09
















0














I would to send an email with VBA. My provider is: Hotmail Live. In the mail settings the SMTP server name is: smtp.office365.com with the port: 587.



Sub SendEmailLive()

Dim mail As New Message

Dim Config As Configuration
Set Config = mail.Configuration

Config(cdoSendUsingMethod) = cdoSendUsingPort
Config(cdoSMTPServer) = "smtp.office365.com"
Config(cdoSMTPServerPort) = 587
Config(cdoSMTPAuthenticate) = cdoBasic
Config(cdoSMTPUseSSL) = True
Config(cdoSendUserName) = "mymail@live.it"
Config(cdoSendPassword) = "mailpassword"
Config.Fields.Update

mail.Configuration = Config

mail.To = "to_mail@gmail.com"
mail.From = "mymail@live.it"
mail.Subject = "Mail test"
mail.HTMLBody = "This is a text"

mail.Send
MsgBox "Sent"

End Sub



The error is: The transport failed to connect to the server




And the debug stops on mail.Send










share|improve this question
























  • Maybe the last answer at the bottom of this post can help: stackoverflow.com/questions/1814553/…
    – Kubie
    Nov 12 '18 at 19:02










  • I tried to use localhost as a server but it returns the same error
    – Ticras
    Nov 12 '18 at 19:12










  • Not sure if it make a difference but try Config.Fields.Item(cdo…) = instead of Config(cdo…) =. And make sure that there are no strange characters in your password that VBA cannot use properly.
    – Pᴇʜ
    Nov 13 '18 at 9:20












  • Unfortunately I tested the two suggestions but neither resolves
    – Ticras
    Nov 13 '18 at 9:47










  • Code looks fine and I don't think this is a programming issue since you get an error message that connection to the server failed. This should be an issue with the server parameters or user credentials. Check again if your user login credentials are correct. Check if your or your company's firewall blocks your traffic.
    – Pᴇʜ
    Nov 13 '18 at 11:09














0












0








0







I would to send an email with VBA. My provider is: Hotmail Live. In the mail settings the SMTP server name is: smtp.office365.com with the port: 587.



Sub SendEmailLive()

Dim mail As New Message

Dim Config As Configuration
Set Config = mail.Configuration

Config(cdoSendUsingMethod) = cdoSendUsingPort
Config(cdoSMTPServer) = "smtp.office365.com"
Config(cdoSMTPServerPort) = 587
Config(cdoSMTPAuthenticate) = cdoBasic
Config(cdoSMTPUseSSL) = True
Config(cdoSendUserName) = "mymail@live.it"
Config(cdoSendPassword) = "mailpassword"
Config.Fields.Update

mail.Configuration = Config

mail.To = "to_mail@gmail.com"
mail.From = "mymail@live.it"
mail.Subject = "Mail test"
mail.HTMLBody = "This is a text"

mail.Send
MsgBox "Sent"

End Sub



The error is: The transport failed to connect to the server




And the debug stops on mail.Send










share|improve this question















I would to send an email with VBA. My provider is: Hotmail Live. In the mail settings the SMTP server name is: smtp.office365.com with the port: 587.



Sub SendEmailLive()

Dim mail As New Message

Dim Config As Configuration
Set Config = mail.Configuration

Config(cdoSendUsingMethod) = cdoSendUsingPort
Config(cdoSMTPServer) = "smtp.office365.com"
Config(cdoSMTPServerPort) = 587
Config(cdoSMTPAuthenticate) = cdoBasic
Config(cdoSMTPUseSSL) = True
Config(cdoSendUserName) = "mymail@live.it"
Config(cdoSendPassword) = "mailpassword"
Config.Fields.Update

mail.Configuration = Config

mail.To = "to_mail@gmail.com"
mail.From = "mymail@live.it"
mail.Subject = "Mail test"
mail.HTMLBody = "This is a text"

mail.Send
MsgBox "Sent"

End Sub



The error is: The transport failed to connect to the server




And the debug stops on mail.Send







excel vba excel-vba email






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited Nov 13 '18 at 9:07









Pᴇʜ

20.2k42650




20.2k42650










asked Nov 12 '18 at 18:48









Ticras

31




31












  • Maybe the last answer at the bottom of this post can help: stackoverflow.com/questions/1814553/…
    – Kubie
    Nov 12 '18 at 19:02










  • I tried to use localhost as a server but it returns the same error
    – Ticras
    Nov 12 '18 at 19:12










  • Not sure if it make a difference but try Config.Fields.Item(cdo…) = instead of Config(cdo…) =. And make sure that there are no strange characters in your password that VBA cannot use properly.
    – Pᴇʜ
    Nov 13 '18 at 9:20












  • Unfortunately I tested the two suggestions but neither resolves
    – Ticras
    Nov 13 '18 at 9:47










  • Code looks fine and I don't think this is a programming issue since you get an error message that connection to the server failed. This should be an issue with the server parameters or user credentials. Check again if your user login credentials are correct. Check if your or your company's firewall blocks your traffic.
    – Pᴇʜ
    Nov 13 '18 at 11:09


















  • Maybe the last answer at the bottom of this post can help: stackoverflow.com/questions/1814553/…
    – Kubie
    Nov 12 '18 at 19:02










  • I tried to use localhost as a server but it returns the same error
    – Ticras
    Nov 12 '18 at 19:12










  • Not sure if it make a difference but try Config.Fields.Item(cdo…) = instead of Config(cdo…) =. And make sure that there are no strange characters in your password that VBA cannot use properly.
    – Pᴇʜ
    Nov 13 '18 at 9:20












  • Unfortunately I tested the two suggestions but neither resolves
    – Ticras
    Nov 13 '18 at 9:47










  • Code looks fine and I don't think this is a programming issue since you get an error message that connection to the server failed. This should be an issue with the server parameters or user credentials. Check again if your user login credentials are correct. Check if your or your company's firewall blocks your traffic.
    – Pᴇʜ
    Nov 13 '18 at 11:09
















Maybe the last answer at the bottom of this post can help: stackoverflow.com/questions/1814553/…
– Kubie
Nov 12 '18 at 19:02




Maybe the last answer at the bottom of this post can help: stackoverflow.com/questions/1814553/…
– Kubie
Nov 12 '18 at 19:02












I tried to use localhost as a server but it returns the same error
– Ticras
Nov 12 '18 at 19:12




I tried to use localhost as a server but it returns the same error
– Ticras
Nov 12 '18 at 19:12












Not sure if it make a difference but try Config.Fields.Item(cdo…) = instead of Config(cdo…) =. And make sure that there are no strange characters in your password that VBA cannot use properly.
– Pᴇʜ
Nov 13 '18 at 9:20






Not sure if it make a difference but try Config.Fields.Item(cdo…) = instead of Config(cdo…) =. And make sure that there are no strange characters in your password that VBA cannot use properly.
– Pᴇʜ
Nov 13 '18 at 9:20














Unfortunately I tested the two suggestions but neither resolves
– Ticras
Nov 13 '18 at 9:47




Unfortunately I tested the two suggestions but neither resolves
– Ticras
Nov 13 '18 at 9:47












Code looks fine and I don't think this is a programming issue since you get an error message that connection to the server failed. This should be an issue with the server parameters or user credentials. Check again if your user login credentials are correct. Check if your or your company's firewall blocks your traffic.
– Pᴇʜ
Nov 13 '18 at 11:09




Code looks fine and I don't think this is a programming issue since you get an error message that connection to the server failed. This should be an issue with the server parameters or user credentials. Check again if your user login credentials are correct. Check if your or your company's firewall blocks your traffic.
– Pᴇʜ
Nov 13 '18 at 11:09












0






active

oldest

votes











Your Answer






StackExchange.ifUsing("editor", function () {
StackExchange.using("externalEditor", function () {
StackExchange.using("snippets", function () {
StackExchange.snippets.init();
});
});
}, "code-snippets");

StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "1"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});

function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});


}
});














draft saved

draft discarded


















StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53268321%2fsend-hotmail-live-email-with-excel-vba%23new-answer', 'question_page');
}
);

Post as a guest















Required, but never shown

























0






active

oldest

votes








0






active

oldest

votes









active

oldest

votes






active

oldest

votes
















draft saved

draft discarded




















































Thanks for contributing an answer to Stack Overflow!


  • Please be sure to answer the question. Provide details and share your research!

But avoid



  • Asking for help, clarification, or responding to other answers.

  • Making statements based on opinion; back them up with references or personal experience.


To learn more, see our tips on writing great answers.





Some of your past answers have not been well-received, and you're in danger of being blocked from answering.


Please pay close attention to the following guidance:


  • Please be sure to answer the question. Provide details and share your research!

But avoid



  • Asking for help, clarification, or responding to other answers.

  • Making statements based on opinion; back them up with references or personal experience.


To learn more, see our tips on writing great answers.




draft saved


draft discarded














StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f53268321%2fsend-hotmail-live-email-with-excel-vba%23new-answer', 'question_page');
}
);

Post as a guest















Required, but never shown





















































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown

































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown







這個網誌中的熱門文章

Hercules Kyvelos

Tangent Lines Diagram Along Smooth Curve

Yusuf al-Mu'taman ibn Hud