Run-time error "Method "Add" of object "Attachments" failed"

[Jyggalag]

Dear all,

I am trying to run a macro that sends out emails, however when I try to run it I keep getting this error unfortunately:

Can somebody please help me figure out why? I have tried setting source = ThisWorkbook.FullName (takes the current excel file I am typing in as an attachment) before and then typing EmailItem.Attachments.Add Source with no issues.

For some reason this gives me an error now with the debug highlighting EmailItem.Attachments.Add Source

Can somebody figure out why?

Would be immensely greatful!

Kind regards
Jyggalag

 

[Jyggalag]

Full code:

Sub SendEmail()

Dim EmailApp As Outlook.Application
Dim Source As String
Set EmailApp = New Outlook.Application

Dim EmailItem As Outlook.MailItem
Set EmailItem = EmailApp.CreateItem(olMailItem)

EmailItem.To = Join(Filter(Application.Transpose(Range("O2:O10")), " ", False), ";")
EmailItem.CC = "test2@mail.com"
EmailItem.BCC = "test3@mail.com"
EmailItem.Subject = "Test Email From Excel VBA"
EmailItem.HTMLBody = "Dear all,<br/>" & "<BR><BR>" & _
"text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text text .<br/>" & "<BR><BR>" & _
Source = ThisWorkbook.FullName
EmailItem.Attachments.Add Source

EmailItem.Send

End Sub

Update: I also tend to get this error now:

 

[RoryA]

A reminder:

Cross-posting (posting the same question in more than one forum) is not against our rules, but the method of doing so is covered by #13 of the Forum Rules.

Be sure to follow & read the link at the end of the rule too!

Cross posted at:

Run-time error "Method "Add" of object "Attachments" failed" - HELP

Dear all, I am trying to run a macro that sends out emails, however when I try to run it I keep getting this error unfortunately: Run-time error "-2147..." Method "Add of object"Attchments"failed Can somebody please help me figure out why? I have tried setting source =...

www.excelforum.com

If you have posted the question at more places, please provide links to those as well.

If you do cross-post in the future and also provide links, then there shouldn’t be a problem.

 

[Jyggalag]

A reminder:

Cross-posting (posting the same question in more than one forum) is not against our rules, but the method of doing so is covered by #13 of the Forum Rules.

Be sure to follow & read the link at the end of the rule too!

Cross posted at:

Run-time error "Method "Add" of object "Attachments" failed" - HELP

Dear all, I am trying to run a macro that sends out emails, however when I try to run it I keep getting this error unfortunately: Run-time error "-2147..." Method "Add of object"Attchments"failed Can somebody please help me figure out why? I have tried setting source =...

www.excelforum.com

If you have posted the question at more places, please provide links to those as well.

If you do cross-post in the future and also provide links, then there shouldn’t be a problem.

Apologies! Will make sure not to do this again.

 

[RoryA]

Has the workbook been saved?

 

[Jyggalag]

Has the workbook been saved?

Good point!

I saved the workbook and now it just comes with the previous error:

What can I do about this?

 

[RoryA]

That isn't an error. It looks like you put a breakpoint there.

 

[Jyggalag]

I

That isn't an error. It looks like you put a breakpoint there.

I apologize for not understanding you completely, but what do you mean by breakpoint if I may ask?

I tried running the code again (after having saved the file of course) and now it gives this error:

When I try to debug, this gets highlighted:

 

[RoryA]

You definitely saved the workbook that has the code in it?

A breakpoint is a point you can set where the code will stop and wait for you to debug it. The little red dot in the margin is the indicator for it. You use f9 to set and clear them on any executable line of code.

 

[Jyggalag]

You definitely saved the workbook that has the code in it?

A breakpoint is a point you can set where the code will stop and wait for you to debug it. The little red dot in the margin is the indicator for it. You use f9 to set and clear them on any executable line of code.

Yes I did, and I still get this error

I have it saved in a subfolder, didnt create any issues before: