Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Junior Member
 
Posts: 2
Default Copy select cells from active row into email body

Hello,

I am looking for some help with the syntax for copying range A:F of the active row based on the formula information from the vb excerpt below. What you see works great, but I need to replace the "insert A-F HERE" in the email body with actual data.


Sub FollowUp()
Dim Cell As Range
For Each Cell In Sheet3.Range("L3:L" & Sheet3.Range("L" & Rows.Count).End(xlUp).Row)
If IsEmpty(Cell.Value) Then GoTo X:
If Cell.Value - Date <= -10 Then
Cell.Interior.ColorIndex = 45
If Cell.Interior.ColorIndex =45 Then
Dim OutApp As Object
Dim OutMail As Object
Dim strbody As String


Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

strbody = "The quote approval period for the Repair asset" & vbNewLine & _
"listed below has expired:" & vbNewLine & vbNewLine & _
"Insert A-F HERE" & vbNewLine & _
"Please contact the customer as soon as possible" & vbNewLine _

On Error Resume Next
With OutMail...


Thank you in advance for your patience and understanding
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
COPY/PASTE to body of email the format of Excell cell LetMeDoIt Excel Programming 2 August 4th 08 12:39 PM
Copy the body of an existing email in new emails generated via Excel with VBA. [email protected] Excel Programming 0 February 21st 06 10:17 PM
Copy a sheet to the body of an email or attach part of a spreadsheet David Excel Programming 1 February 17th 05 10:45 AM
Copy a sheet to the body of an email or attach part of a spreadsheet David Excel Programming 0 February 16th 05 11:24 PM
Copy and Paste a Worksheet Range to Email Body Eric[_14_] Excel Programming 1 January 20th 04 01:06 AM


All times are GMT +1. The time now is 01:04 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"