code to paste the content of specific cells into the email generated by VBA

[garfen]

HI ALL,

i have wrote a vba to generate the an email from clinking on a command button it shows as below

Option Explicit

Private Sub CommandButton1_Click()

On Error GoTo ErrHandler

' SET Outlook APPLICATION OBJECT.
Dim objOutlook As Object
Set objOutlook = CreateObject("Outlook.Application")

' CREATE EMAIL OBJECT.
Dim objEmail As Object
Set objEmail = objOutlook.CreateItem(olMailItem)

With objEmail
.to = "[email protected]"
.Subject = "This is a test message from Arun Banik"
.Body = "Hi there"
.Display ' DISPLAY MESSAGE.
End With

' CLEAR.
Set objEmail = Nothing: Set objOutlook = Nothing

ErrHandler:
'
End sub

i just need a code to add the content of a specific number of cells into the body of the email, please help.

thanx
garfen

[AlphaFrog]

This link may help.
Mail from Excel with Outlook (Windows)

[garfen]

hi alpha, thanx for the fast reply.

i am checking it right now.

regards
garfen

[garfen]

hi man,

i am trying it its not working, alot of errors its killing me, is there any way that you can please paste the code here and tell me where to add it exactly, i am not that good with excel.

thank you