>>>> .Range("g6").Value = Sheets("data").Range("d" & i).Value
>>>>>> .Range("a8").Value = Sheets("data").Range("e" & i).Value
>>>>>> .Range("g8").Value
Sheets("data").Range("f" & i).Value
>>>>> .Range("a10").Value = Sheets("data").Range("g" & i).Value
>>>>> .Range("g10").Value = Sheets("data").Range("h" & i).Value
>>>
h" & i).Value
>>>> .Range("a12").Value = Sheets("data").Range("i" & i).Value
>>>> End With
>>>>
>>>> 'send email now
>>>> Sheets("Verification").Copy
>>>>
y_hh_mm_ss") & ".xlsx"
>>> Set wkb = ActiveWorkbook
>>> wkb.SaveAs flname
>>>
>>> Set olMail = objOL.CreateItem(olMailItem)
>>> With olMail
>>> .To = Sheets("Verification").Range("a12")
>
With olMail
>> .To = Sheets("Verification").Range("a12")
>> .Subject = "Verification"
>> .Attachments.Add flname
>> .Body = "Please verfiyy--"
>> .display
>> End With
e
>
> Set olMail = objOL.CreateItem(olMailItem)
> With olMail
> .To = Sheets("Verification").Range("a12")
> .Subject = "Verification"
> .Attachments.Add flname
> .Body = "Please verfiyy--
heets("Verification").Range("a12")
.Subject = "Verification"
.Attachments.Add flname
.Body = "Please verfiyy--"
.display
End With
wkb.Close
Kill flname
Set olMail = Nothing
Next
Set olApp = Noth
-Macros$$ Copy Past Macro help
Hi,
Need help in macro for attached file.
I have one excel sheet where as I have around 500 vendors and I need to
send mail to each vendor as per their email id but after filling up their
respective data in verification sheet.
I would like to auto populate
Hi,
Need help in macro for attached file.
I have one excel sheet where as I have around 500 vendors and I need to
send mail to each vendor as per their email id but after filling up their
respective data in verification sheet.
I would like to auto populate the filed from data sheet to Ve
alvankar >
> *Sender: * excel-...@googlegroups.com
> *Date: *Fri, 13 Sep 2013 10:57:37 -0700 (PDT)
> *To: *>
> *ReplyTo: * excel-...@googlegroups.com
> *Subject: *$$Excel-Macros$$ Copy Past Macro help
>
> Hi,
>
>
>
> Need help in macro for attached file.
10 matches
Mail list logo