VBA + Отправить почту из Word 2007

Question

Я получил код ниже в своем документе Word (Office 2007), чтобы отправить письмо с приложением Выдает синтаксическую ошибку (файл не найден) в строке

.Attachement.Add "C: \ abc.txt"

Код:

Private Sub CommandButton1_Click()

Dim outlookapp As Object
Dim item As Object
Dim subject As String
Dim msg As String

    Set outlookapp = CreateObject("outlook.application")

    msg = "Enter Message here"
    subject = "Enter subject here"
    Set item = outlookapp.createitem(0)

    With item
        .to = "some1@aaaaa.com <mailto:some1@aaaa.com> "
        .subject = subject
        .body = msg
        .Display
        .Attachments.Add "C:\abc.txt"
    End With

    End Sub

Что я делаю не так?

Спасибо

Answer 1

Синтаксис для добавления вложения к элементу должен содержать имя файла в квадратных скобках.

Попробуйте использовать

.Attachments.Add ("C:\abc.txt")

вместо

.Attachments.Add "C:\abc.txt"

Answer 2

Я попробовал код выше, и он работал для меня. Можете ли вы прикрепить файл, расположенный где-то, кроме корня C, например, c: \ docs \?

РЕДАКТИРОВАТЬ Re Comment

Если в пути есть пробелы, вам понадобятся дополнительные кавычки:

strfile="""c:\abc def.txt"""