Happy Friday Everyone!

I have put together a report for some of my employees to send an update out. I need a range embedded. I found some code for embedding and i can get the image sent, but something I changed with the code prevents the image from displaying on mobile devices.

Here is the HTML part of my code. My HTML knowledge is limited to not much more than typing the letters "HTML" and wishing real hard. Thanks for any help you can provide!


With OutMail
        .To = g
        .Cc = ""
        .BCC = ""
        .Subject = e
        .HTMLBody = "<span LANG=EN>" _
            & "<p class=style2><span LANG=EN><font FACE=Calibri SIZE=3>" _
            & "The manpower report has been updated. Please see below." _
            & "<br><BR>" _
            & h
                
            If ThisWorkbook.Sheets("Adjusted Lineup").Range("h1").Value = 0 Then
            Call createJpg("Adjusted Lineup", "AdjLineup2", "Manpower")
            Else
            Call createJpg("Adjusted Lineup", "AdjLineup", "Manpower")
            End If

        TempFilePath = Environ$("temp") & "\"
        .Attachments.Add TempFilePath & "Manpower.gif"
                
        .HTMLBody = .HTMLBody & "<br><B>MANPOWER REPORT</B><br>" _
            & "<img src='cid:Manpower.gif'" & "width='100%' height='100%'><br>" _
            & "<br>Best Regards,<br>" & i & "<br>Crew Management Center</font></span>"

                 
        .Send   'or use .Display
        '.Display
    End With