I have a code in place to send the active file to a given address.
I have one user who keeps getting an error when she tries to run the macro.
Here's the code:
The error that is generated reads: "Run-time error 429: ActiveX component can't create object".
I am entirely self taught (thanks in greatest part to this board) and I have really no understanding of ActiveX controls.
I notice that this problem only exists for 1 in over 100 users, so I think it is specific to the settings on her PC.
Any advice would be much appreciated so I can get the code to work for her.
Xeroid.
I have one user who keeps getting an error when she tries to run the macro.
Here's the code:
Code:
'Send the file in an Outlook message with formletter:
Dim myOutlook As Object
Dim myMailItem As Object
Set otlApp = CreateObject("Outlook.Application")
Set otlNewMail = otlApp.CreateItem(olMailItem)
fName = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
With otlNewMail
.To = "me.myself@mycompany.com"
.Subject = "New box list for review - " & ActiveWorkbook.Name
.Body = "Please review the following list of new boxes to be picked up." & Chr(13) & Chr(13)
.Attachments.Add fName
.Display
End With
Set otlNewMail = Nothing
Set otlApp = Nothing
Set otlAttach = Nothing
Set otlMess = Nothing
Set otlNSpace = Nothing
'
End Sub
The error that is generated reads: "Run-time error 429: ActiveX component can't create object".
I am entirely self taught (thanks in greatest part to this board) and I have really no understanding of ActiveX controls.
I notice that this problem only exists for 1 in over 100 users, so I think it is specific to the settings on her PC.
Any advice would be much appreciated so I can get the code to work for her.
Xeroid.