M
mike0021
Hi, I am having a problem with a script.
I am just trying to send a range of cells from my spreadsheet throug
Outlook. The code works if I just send ONE cell, but if I send th
range it just returns "TRUE" in the body. Any idea what is up?
Sub Email()
Dim o
Dim m
Dim Msg As String
Dim emailAddress As String
Application.DisplayAlerts = False
Set o = CreateObject("Outlook.Application")
Set m = o.CreateItem(0)
emailAddress = Cells(24, 1)
m.To = emailAddress
m.Subject = " Partials Report "
Msg = Range("A1", "C5").Select
m.body = Msg
m.Send
End Sub
Thanks all,
Mik
I am just trying to send a range of cells from my spreadsheet throug
Outlook. The code works if I just send ONE cell, but if I send th
range it just returns "TRUE" in the body. Any idea what is up?
Sub Email()
Dim o
Dim m
Dim Msg As String
Dim emailAddress As String
Application.DisplayAlerts = False
Set o = CreateObject("Outlook.Application")
Set m = o.CreateItem(0)
emailAddress = Cells(24, 1)
m.To = emailAddress
m.Subject = " Partials Report "
Msg = Range("A1", "C5").Select
m.body = Msg
m.Send
End Sub
Thanks all,
Mik