Re: $$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-23 Thread Farrukh Shaikh
>>> *From: * Farrukh Shaikh >>> *Sender: * excel-macros@googlegroups.com >>> *Date: *Tue, 19 Nov 2013 13:10:50 +0500 >>> *To: * >>> *ReplyTo: * excel-macros@googlegroups.com >>> *Subject: *Re: $$Excel-Macros$$ Stuck in attachi

Re: $$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-22 Thread ashish koul
e, 19 Nov 2013 13:10:50 +0500 >> *To: * >> *ReplyTo: * excel-macros@googlegroups.com >> *Subject: *Re: $$Excel-Macros$$ Stuck in attaching multiple image files >> in email body >> >> Thanks ashish koul, i tried and its working now but in a slightly >> different way .! he

Re: $$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-19 Thread Farrukh Shaikh
erry® from Vodafone > -- > *From: * Farrukh Shaikh > *Sender: * excel-macros@googlegroups.com > *Date: *Tue, 19 Nov 2013 13:10:50 +0500 > *To: * > *ReplyTo: * excel-macros@googlegroups.com > *Subject: *Re: $$Excel-Macros$$ Stuck in attaching multi

Re: $$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-19 Thread koul . ashish
You need to attach the images as well Sent on my BlackBerry® from Vodafone -Original Message- From: Farrukh Shaikh Sender: excel-macros@googlegroups.com Date: Tue, 19 Nov 2013 13:10:50 To: Reply-To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Stuck in attaching multiple

Re: $$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-19 Thread Farrukh Shaikh
Thanks ashish koul, i tried and its working now but in a slightly different way .! here is the line : uuu = Mid(sImgPath, InStrRev(sImgPath, "\") + 1) HTML = HTML + "" .HTMLbody HTML But now the images in the body are shown as red cross rather then the whole image. suggestions are anxiously awai

Re: $$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-18 Thread ashish koul
try something like this Sub sample_macro() Dim objOL As Object Dim olMail As Object Dim bdy As String For Each itm In Array("C:\Users\Public\Pictures\Sample Pictures\desert.jpg", "C:\Users\Public\Pictures\Sample Pictures\tulips.jpg") bdy = bdy & " " Next itm

$$Excel-Macros$$ Stuck in attaching multiple image files in email body

2013-11-15 Thread Farrukh Shaikh
Dear Coders, iam new to VBA, was trying to automate my work, this is the last step of my task, some images are stored at a path ( here the path is in sImgPath ) when i try to insert the image in the email, first image is inserted properly, but when there is the second iteration, it deletes the p