Hi team
Please help to any VBA code to save data Form as a PDF in one thread as per the EMP id Eg: Having 4 Accounts so Form showing in one PDF like Thread.
I m Using VBA code :
>>> use code - tags <<<
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("Retailer Dialogue-All retailers").Select...
Hi, sir as per the vb code we send this file with saves as some required sheet on another folder and added snapshot on the email body along with the saveas attachment.
the issue is that saves as a file having a with a formula which is required paste values and formatting only, so please help me...
Thankyou Sir For your Kind response my motive is i want to send the file thru mail but main souRCE file having caluculated thru formula i want to send file with paste special values only
Option Explicit
Sub Send_Email_With_snapshot()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Sheet1")
ActiveWorkbook.RefreshAll
Dim lr As Integer
lr = sh.Range("A" & Application.Rows.Count).End(xlUp).Row
sh.Range("A1:AG48").Select
With Selection.Parent.MailEnvelope.Item
.to =...
Hi Please help
i want to filter data as per given criteria in list (mentioned any where in file) from base and send to a new mail and also same attached as image in mail body. and send
base file is attached for reference.
Thankyou.
<< Modify Your Title as written in Forum Rules >>
<< USE CODE...
Please help and edit VB Code to send the mail along with attachment and same paste on mail body also: thanks in advance.
Sub sendmail()
'
' sendmail Macro
'
Dim dte As Date
Dim mon As Integer
Dim yr As Integer
Dim mailcount As Integer
Dim filtercol As Integer
Dim Maildb As Object
Dim MailDoc...
Option Explicit
Sub SNAPSHOT()
Dim RNG As Range
Set RNG = Range("B2:O10")
''.............
Workbooks.Add
Dim CH As Chart
Set CH = Charts.Add
CH.Location xlLocationAsObject, "Sheet1"
Set CH = ActiveChart
RNG.CopyPicture xlScreen, xlBitmap
CH.Paste
CH.Export...
Hi team Any one help me out to rectified this need to change lotus mail converted into outlook how can we use this thru out look please help
vb code given below
Sub sendmail()
'
' sendmail Macro
'
Dim dte As Date
Dim mon As Integer
Dim yr As Integer
Dim mailcount As Integer
Dim filtercol As...