check this
http://www.rondebruin.nl/win/s7/win001.htm
http://www.rondebruin.nl/win/section7.htm


On Tue, Feb 4, 2014 at 8:31 PM, Atul Kesaria <atul.kesa...@gmail.com> wrote:

> Hi Ashish,
>
> One more help to earlier macro. Is there a way we can put password to the
> PDF file or make a zip file of respective pdf file with a password and then
> email. Password can be predefined to either date of birth or anything else
> which would be incorporated in the excel file.
>
> Regards
> Atul
>
>
> On Mon, Feb 3, 2014 at 1:25 PM, Atul Kesaria <atul.kesa...@gmail.com>wrote:
>
>> Thanks Ashish....really helpfull...
>>
>>
>> On Mon, Feb 3, 2014 at 10:50 AM, ashish koul <koul.ash...@gmail.com>wrote:
>>
>>> try this
>>>
>>> Set Mailrng = Sheets("Sheet1").Range("c2:c" &
>>> Sheets("Sheet1").Range("c1").End(xlDown).Row)
>>>
>>>
>>> On Mon, Feb 3, 2014 at 12:28 AM, Atul Kesaria <atul.kesa...@gmail.com>wrote:
>>>
>>>> Hi Ashish,
>>>>
>>>> You are rockstar. Just one last help. Can the range be set a dynamic
>>>> rather than static....as the range will vary from time to time.
>>>>
>>>> Regards
>>>> Atul
>>>>
>>>>
>>>> On Sun, Feb 2, 2014 at 9:50 PM, ashish koul <koul.ash...@gmail.com>wrote:
>>>>
>>>>> Sub test()
>>>>>
>>>>> Dim mailrng As Range
>>>>> Dim cl As Range
>>>>> Dim fl_path As String
>>>>>
>>>>>
>>>>>
>>>>> Set mailrng = Sheets("Sheet1").Range("c2:c5")
>>>>> For Each cl In mailrng
>>>>>     Call sendmail(cl.Value, cl.Offset(0, -1).Value, cl.Offset(0, 1))
>>>>> Next
>>>>>
>>>>> End Sub
>>>>>
>>>>> Sub sendmail(mailid As String, nm As String, flname As String)
>>>>> Dim OutApp As Object
>>>>> Dim OutMail As Object
>>>>>
>>>>> Set OutApp = CreateObject("Outlook.Application")
>>>>>
>>>>> Set OutMail = OutApp.CreateItem(0)
>>>>>
>>>>> On Error Resume Next
>>>>> With OutMail
>>>>> .to = mailid
>>>>> .Subject = "Hello!"
>>>>> .Body = "Dear " & nm & "," & vbNewLine & vbNewLine & "HELLO !" &
>>>>> vbNewLine & vbNewLine & "Thank you"
>>>>> .Attachments.Add "C:\Documents and Settings\Ashish Koul\Desktop\fb
>>>>> page problem\" & flname & ".XLSX"
>>>>> .display 'or use .send
>>>>> End With
>>>>> On Error GoTo 0
>>>>> Set OutMail = Nothing
>>>>> Set OutApp = Nothing
>>>>> End Sub
>>>>>
>>>>>
>>>>>
>>>>> On Sun, Feb 2, 2014 at 6:23 PM, Atul Kesaria 
>>>>> <atul.kesa...@gmail.com>wrote:
>>>>>
>>>>>> Hi Team,
>>>>>>
>>>>>> Any luck of my earlier mail.
>>>>>>
>>>>>> Regards
>>>>>> Atul
>>>>>>
>>>>>>
>>>>>> On Sat, Feb 1, 2014 at 10:34 PM, Atul Kesaria <atul.kesa...@gmail.com
>>>>>> > wrote:
>>>>>>
>>>>>>> Hi
>>>>>>> PFA file....please note that the attachment which need to go with
>>>>>>> each mail would be a PDF file.
>>>>>>>
>>>>>>>
>>>>>>> On Sat, Feb 1, 2014 at 10:33 PM, Atul Kesaria <
>>>>>>> atul.kesa...@gmail.com> wrote:
>>>>>>>
>>>>>>>> PFA
>>>>>>>>
>>>>>>>>
>>>>>>>> On Sat, Feb 1, 2014 at 7:45 PM, ashish koul 
>>>>>>>> <koul.ash...@gmail.com>wrote:
>>>>>>>>
>>>>>>>>> please share a sample file
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> On Sat, Feb 1, 2014 at 5:19 PM, Atul Kesaria <
>>>>>>>>> atul.kesa...@gmail.com> wrote:
>>>>>>>>>
>>>>>>>>>> Hi Team,
>>>>>>>>>>
>>>>>>>>>> I need a help in getting a macro which will help sending email
>>>>>>>>>> with attachment to list of person in the excel sheet which will have 
>>>>>>>>>> there
>>>>>>>>>> Name, email ID,Unique number. Please note that every person should
>>>>>>>>>> receive a particular file based on their unique number. File are 
>>>>>>>>>> prestored
>>>>>>>>>> in a particular location with a unique number mention in the excel 
>>>>>>>>>> sheet.
>>>>>>>>>> The subject line and body on the email will remain same.
>>>>>>>>>>
>>>>>>>>>> Thanking in advance.
>>>>>>>>>>
>>>>>>>>>> Regards
>>>>>>>>>> Atul
>>>>>>>>>>
>>>>>>>>>> --
>>>>>>>>>> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna
>>>>>>>>>> be? It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this 
>>>>>>>>>> forum @
>>>>>>>>>> https://www.facebook.com/discussexcel
>>>>>>>>>>
>>>>>>>>>> FORUM RULES
>>>>>>>>>>
>>>>>>>>>> 1) Use concise, accurate thread titles. Poor thread titles, like
>>>>>>>>>> Please Help, Urgent, Need Help, Formula Problem, Code Problem, and 
>>>>>>>>>> Need
>>>>>>>>>> Advice will not get quick attention or may not be answered.
>>>>>>>>>> 2) Don't post a question in the thread of another member.
>>>>>>>>>> 3) Don't post questions regarding breaking or bypassing any
>>>>>>>>>> security measure.
>>>>>>>>>> 4) Acknowledge the responses you receive, good or bad.
>>>>>>>>>> 5) Jobs posting is not allowed.
>>>>>>>>>> 6) Sharing copyrighted material and their links is not allowed.
>>>>>>>>>>
>>>>>>>>>> NOTE : Don't ever post confidential data in a workbook. Forum
>>>>>>>>>> owners and members are not responsible for any loss.
>>>>>>>>>> ---
>>>>>>>>>> You received this message because you are subscribed to the
>>>>>>>>>> Google Groups "MS EXCEL AND VBA MACROS" group.
>>>>>>>>>> To unsubscribe from this group and stop receiving emails from it,
>>>>>>>>>> send an email to excel-macros+unsubscr...@googlegroups.com.
>>>>>>>>>> To post to this group, send email to
>>>>>>>>>> excel-macros@googlegroups.com.
>>>>>>>>>> Visit this group at http://groups.google.com/group/excel-macros.
>>>>>>>>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>>>>>>>>
>>>>>>>>>
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> --
>>>>>>>>> *Regards*
>>>>>>>>>
>>>>>>>>> *Ashish Koul*
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> *Visit*
>>>>>>>>> http://www.excelvbamacros.in
>>>>>>>>> Like Us on 
>>>>>>>>> Facebook<http://www.facebook.com/pages/Excel-VBA-Codes-Macros/151803898222297>
>>>>>>>>> Join Us on Facebook<http://www.facebook.com/groups/163491717053198/>
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> P Before printing, think about the environment.
>>>>>>>>>
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> --
>>>>>>>>> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna
>>>>>>>>> be? It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this 
>>>>>>>>> forum @
>>>>>>>>> https://www.facebook.com/discussexcel
>>>>>>>>>
>>>>>>>>> FORUM RULES
>>>>>>>>>
>>>>>>>>> 1) Use concise, accurate thread titles. Poor thread titles, like
>>>>>>>>> Please Help, Urgent, Need Help, Formula Problem, Code Problem, and 
>>>>>>>>> Need
>>>>>>>>> Advice will not get quick attention or may not be answered.
>>>>>>>>> 2) Don't post a question in the thread of another member.
>>>>>>>>> 3) Don't post questions regarding breaking or bypassing any
>>>>>>>>> security measure.
>>>>>>>>> 4) Acknowledge the responses you receive, good or bad.
>>>>>>>>> 5) Jobs posting is not allowed.
>>>>>>>>> 6) Sharing copyrighted material and their links is not allowed.
>>>>>>>>>
>>>>>>>>> NOTE : Don't ever post confidential data in a workbook. Forum
>>>>>>>>> owners and members are not responsible for any loss.
>>>>>>>>> ---
>>>>>>>>> You received this message because you are subscribed to the Google
>>>>>>>>> Groups "MS EXCEL AND VBA MACROS" group.
>>>>>>>>> To unsubscribe from this group and stop receiving emails from it,
>>>>>>>>> send an email to excel-macros+unsubscr...@googlegroups.com.
>>>>>>>>> To post to this group, send email to excel-macros@googlegroups.com
>>>>>>>>> .
>>>>>>>>> Visit this group at http://groups.google.com/group/excel-macros.
>>>>>>>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>>>>>>>
>>>>>>>>
>>>>>>>>
>>>>>>>
>>>>>>  --
>>>>>> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be?
>>>>>> It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
>>>>>> https://www.facebook.com/discussexcel
>>>>>>
>>>>>> FORUM RULES
>>>>>>
>>>>>> 1) Use concise, accurate thread titles. Poor thread titles, like
>>>>>> Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need
>>>>>> Advice will not get quick attention or may not be answered.
>>>>>> 2) Don't post a question in the thread of another member.
>>>>>> 3) Don't post questions regarding breaking or bypassing any security
>>>>>> measure.
>>>>>> 4) Acknowledge the responses you receive, good or bad.
>>>>>> 5) Jobs posting is not allowed.
>>>>>> 6) Sharing copyrighted material and their links is not allowed.
>>>>>>
>>>>>> NOTE : Don't ever post confidential data in a workbook. Forum owners
>>>>>> and members are not responsible for any loss.
>>>>>> ---
>>>>>> You received this message because you are subscribed to the Google
>>>>>> Groups "MS EXCEL AND VBA MACROS" group.
>>>>>> To unsubscribe from this group and stop receiving emails from it,
>>>>>> send an email to excel-macros+unsubscr...@googlegroups.com.
>>>>>> To post to this group, send email to excel-macros@googlegroups.com.
>>>>>> Visit this group at http://groups.google.com/group/excel-macros.
>>>>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>>>>
>>>>>
>>>>>
>>>>>
>>>>> --
>>>>> *Regards*
>>>>>
>>>>> *Ashish Koul*
>>>>>
>>>>>
>>>>> *Visit*
>>>>> http://www.excelvbamacros.in
>>>>> Like Us on 
>>>>> Facebook<http://www.facebook.com/pages/Excel-VBA-Codes-Macros/151803898222297>
>>>>> Join Us on Facebook <http://www.facebook.com/groups/163491717053198/>
>>>>>
>>>>>
>>>>> P Before printing, think about the environment.
>>>>>
>>>>>
>>>>>
>>>>> --
>>>>> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be?
>>>>> It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
>>>>> https://www.facebook.com/discussexcel
>>>>>
>>>>> FORUM RULES
>>>>>
>>>>> 1) Use concise, accurate thread titles. Poor thread titles, like
>>>>> Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need
>>>>> Advice will not get quick attention or may not be answered.
>>>>> 2) Don't post a question in the thread of another member.
>>>>> 3) Don't post questions regarding breaking or bypassing any security
>>>>> measure.
>>>>> 4) Acknowledge the responses you receive, good or bad.
>>>>> 5) Jobs posting is not allowed.
>>>>> 6) Sharing copyrighted material and their links is not allowed.
>>>>>
>>>>> NOTE : Don't ever post confidential data in a workbook. Forum owners
>>>>> and members are not responsible for any loss.
>>>>> ---
>>>>> You received this message because you are subscribed to the Google
>>>>> Groups "MS EXCEL AND VBA MACROS" group.
>>>>> To unsubscribe from this group and stop receiving emails from it, send
>>>>> an email to excel-macros+unsubscr...@googlegroups.com.
>>>>> To post to this group, send email to excel-macros@googlegroups.com.
>>>>> Visit this group at http://groups.google.com/group/excel-macros.
>>>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>>>
>>>>
>>>>  --
>>>> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be?
>>>> It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
>>>> https://www.facebook.com/discussexcel
>>>>
>>>> FORUM RULES
>>>>
>>>> 1) Use concise, accurate thread titles. Poor thread titles, like Please
>>>> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
>>>> will not get quick attention or may not be answered.
>>>> 2) Don't post a question in the thread of another member.
>>>> 3) Don't post questions regarding breaking or bypassing any security
>>>> measure.
>>>> 4) Acknowledge the responses you receive, good or bad.
>>>> 5) Jobs posting is not allowed.
>>>> 6) Sharing copyrighted material and their links is not allowed.
>>>>
>>>> NOTE : Don't ever post confidential data in a workbook. Forum owners
>>>> and members are not responsible for any loss.
>>>> ---
>>>> You received this message because you are subscribed to the Google
>>>> Groups "MS EXCEL AND VBA MACROS" group.
>>>> To unsubscribe from this group and stop receiving emails from it, send
>>>> an email to excel-macros+unsubscr...@googlegroups.com.
>>>> To post to this group, send email to excel-macros@googlegroups.com.
>>>> Visit this group at http://groups.google.com/group/excel-macros.
>>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>>
>>>
>>>
>>>
>>> --
>>> *Regards*
>>>
>>> *Ashish Koul*
>>>
>>>
>>> *Visit*
>>> http://www.excelvbamacros.in
>>> Like Us on 
>>> Facebook<http://www.facebook.com/pages/Excel-VBA-Codes-Macros/151803898222297>
>>> Join Us on Facebook <http://www.facebook.com/groups/163491717053198/>
>>>
>>>
>>> P Before printing, think about the environment.
>>>
>>>
>>>
>>> --
>>> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be?
>>> It's =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
>>> https://www.facebook.com/discussexcel
>>>
>>> FORUM RULES
>>>
>>> 1) Use concise, accurate thread titles. Poor thread titles, like Please
>>> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
>>> will not get quick attention or may not be answered.
>>> 2) Don't post a question in the thread of another member.
>>> 3) Don't post questions regarding breaking or bypassing any security
>>> measure.
>>> 4) Acknowledge the responses you receive, good or bad.
>>> 5) Jobs posting is not allowed.
>>> 6) Sharing copyrighted material and their links is not allowed.
>>>
>>> NOTE : Don't ever post confidential data in a workbook. Forum owners and
>>> members are not responsible for any loss.
>>> ---
>>> You received this message because you are subscribed to the Google
>>> Groups "MS EXCEL AND VBA MACROS" group.
>>> To unsubscribe from this group and stop receiving emails from it, send
>>> an email to excel-macros+unsubscr...@googlegroups.com.
>>> To post to this group, send email to excel-macros@googlegroups.com.
>>> Visit this group at http://groups.google.com/group/excel-macros.
>>> For more options, visit https://groups.google.com/groups/opt_out.
>>>
>>
>>
>  --
> Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It's
> =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
> https://www.facebook.com/discussexcel
>
> FORUM RULES
>
> 1) Use concise, accurate thread titles. Poor thread titles, like Please
> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
> will not get quick attention or may not be answered.
> 2) Don't post a question in the thread of another member.
> 3) Don't post questions regarding breaking or bypassing any security
> measure.
> 4) Acknowledge the responses you receive, good or bad.
> 5) Jobs posting is not allowed.
> 6) Sharing copyrighted material and their links is not allowed.
>
> NOTE : Don't ever post confidential data in a workbook. Forum owners and
> members are not responsible for any loss.
> ---
> You received this message because you are subscribed to the Google Groups
> "MS EXCEL AND VBA MACROS" group.
> To unsubscribe from this group and stop receiving emails from it, send an
> email to excel-macros+unsubscr...@googlegroups.com.
> To post to this group, send email to excel-macros@googlegroups.com.
> Visit this group at http://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/groups/opt_out.
>



-- 
*Regards*

*Ashish Koul*


*Visit*
http://www.excelvbamacros.in
Like Us on 
Facebook<http://www.facebook.com/pages/Excel-VBA-Codes-Macros/151803898222297>
Join Us on Facebook <http://www.facebook.com/groups/163491717053198/>


P Before printing, think about the environment.

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It's 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups "MS 
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.

Reply via email to