Outlook Does not recognize one or more names

[Tommy Snoberg Soderberg]

Hi,

I have this macro to mail individual mail to my recipients with attachment. I have not altered this macro and it have worked up til now. I cannot find any error in my mail-addresses either. Any suggestions what to look for?

Sub Email_From_Excel_Attachments()

    Dim emailApplication    As Object, emailItem As Object
    Dim cell                As Range, rng        As Range
    
    On Error GoTo myerror
    Set emailApplication = CreateObject("Outlook.Application")
    
    With Sheets("Adresses")
        lastrow = .Cells(.Rows.Count, "B").End(xlUp).Row - 1
        Set rng = .Cells(2, 2).Resize(lastrow, 1)
    End With
    
    For Each cell In rng.Cells
        Set emailItem = emailApplication.CreateItem(0)
    
        With emailItem
            .To = cell.Value
            .cc = cell.Offset(, 1).Value
            .Subject = cell.Offset(, 2).Value & Date
            .Body = cell.Offset(, 3).Value
            .Attachments.Add cell.Offset(, 4).Value
            .Send
        End With
        Set emailItem = Nothing
    Next cell
myerror:
    If Err <> 0 Then MsgBox (Error(Err)), 48, "Error"
End Sub

 

[Tommy Snoberg Soderberg]

A literal email address should work regardless of whether it exists in your contacts. Can you actually send the email immediately after it displays?

I can send it directly in outlook without hitting "enter" so it doesn't convert to name.

But I guess this turned out to be an outlook problem rather than an excel problem.

Many thanks for your help

 

[Tommy Snoberg Soderberg]

I can send it directly in outlook without hitting "enter" so it doesn't convert to name.

But I guess this turned out to be an outlook problem rather than an excel problem.

Many thanks for your help

I can also send it before it changes to name from the display step you advised me to add for the trouble shooting.

 

[RoryA]

Is it only one email address in each cell?

 

[Tommy Snoberg Soderberg]

Is it only one email address in each cell?

In those I have a problem with - yes. Some of the other cells (that works) I have multiple emails in but most of them are just one address.