Send Active Document As Attachment Without Saving?
Mar 20, 2013
I have a sheet containing various information, that I export to a word document, that I then would like to send via email. I would like to do this without saving the document. I am working with office 2010 so the routingslip function is not an option (as far as I know). I have posted some of my code below:
myWord.Options.SendMailAttach = True
myWord.ActiveDocument.SendMail Recipients:=Mailadress, Subject:="Test"
I get an errormessage saing "Compile error. Wrong number of arguments, or invalid property assignment"
View 5 Replies
ADVERTISEMENT
May 4, 2007
I have created a userform in Excel. The information from this userform is saved into a word document using a command button. What I would like to know is can I use vba to, not only create this word document but also, to send it as an email attachment at the same time? Just to make it a bit tougher - I'm using Groupwise as my email software.
View 4 Replies
View Related
Mar 21, 2013
I have a problem concerning sending an active word document via mail. I have a worksheet with various information in it, that I am exporting to a word document. I then want to send the word document via email. I want to do this without saving the changes in the word document. I am working with excel 2010. I have posted some of my code below.
VB:
Sub letter()
Dim myWord As New Word.Application
Dim adr As Variant
[Code]....
I get the following errormessage: "Compile error. Wrong number of arguments or invalid property assignment"
View 2 Replies
View Related
Mar 30, 2009
I have a macro which copies worksheets from the current workbook and pastes into different csv files. I want to add into this macro after copying and pasting into the csv a popup box/form which asks the user "Would you like to e-mail to shops/teletext?". This box/form would have a Yes and No button.
If they press yes then the macro will continue and select worksheet 'selections' and send to recipients as attachment. If possible i would also like to automatically fill in the 'to' box in the new e-mail as these addresses will be the same three addresses each time. If they press 'No' then the macro would just carry on to the next point.
View 4 Replies
View Related
May 16, 2007
Is it possible to have a column with several email addresses and have a macro that emails out with an attachment of a word document? If so how is it done? I dont want to attach any workbooks or sheets just an word file. Furthermore I want to do this via excel not word. Also if its possible I would like to keep a single subject heading for all of them.
View 3 Replies
View Related
Jun 14, 2014
I have set up a form to deposit data into excel database and automatically email recipients with a generic notification when the form is submitted, the form is then cleared. I have also included a print button on the form which can be used to print the completed form. Is it possible for when I submit the form for the email to automatically include an attached image of the completed form??
View 2 Replies
View Related
Jul 30, 2013
I have a VBA script below that auto sends emails from excel. I tried to make this add an excel attachment from a specific location.
Sub SendEm()
Sheets("Template").Select
Dim i As Integer, Mail_Object, Email_Subject, o As Variant, lr As Long
lr = Cells(Rows.Count, "A").End(xlUp).Row[code]....
View 5 Replies
View Related
Apr 15, 2014
I've been searching for a way to save a copy of a workbook as an .xlsx by bringing up the save as dialogue box so the user can name and choose the location and then to open a new email with the send as attachment function so the copy can be sent to user defined recipients.
Any similar requests that I've seen are asking for a specific file name and specific directory.
View 2 Replies
View Related
Jan 13, 2010
The file which I want to send as a CSV needs to be named in a certain way. It would be the contents of cell A2, then the date it was sent and the time. Here is my current code. How can I get it to pick up data from a cell and then add it to the list. Also, the list has to be one string, so for example, 23459 Cell A2, 1310 Date and 192859 would be time. So the renamed file would be named 234591310192859. Here is my code which may make what I'm saying a bit more into a bit more sense. Currently the name which is outputted is 'Name of Spreadsheet.xls 13-Jan-10 19-31-59'.
View 6 Replies
View Related
Mar 2, 2009
putting a macro button on an individual worksheet so the user can click a big easy button and a new email will pop up in Lotus notes with the worksheet attached for them to input the address and then send the worksheet..
I prefer to:
Send individual worksheets only
The ability to input the email address is the new composition email in LOTUS Notes
View 9 Replies
View Related
Aug 20, 2013
How to set up an excel sheet to automatically save data after every data entry? Or maybe after a specified time period?
View 1 Replies
View Related
Jun 23, 2007
I have macros that pulls data from an SQL db. Users need the ability to modify the data on the worksheets BUT they can NOT have the ability to save the document.
Is there a way to disable the "save" function from the FILE drop-down box?
View 9 Replies
View Related
Jan 2, 2009
I have a spreadsheet that automatically creates an email (based on code from rondebruin.com and some manipulation from a consultant) and initially would just save a copy of the message on our network (for records purposes) as well as sending it.
However it occured to me after that there will be times when attachments are required and as such for archiving purposes it really needs any attachments to also be saved as part of the email. What I believe to be the relevant code is shown below:
With OutMail
.To = TextBox6.Value
.CC = ""
.BCC = ""
.subject = "MRWA response to your inquiry on " & ComboBox9.Value
.body = strbody
.Display 'or use .Send
.SaveAs "\Dacsrv02
tddataAdviceTech QueriesTRIM Emails" & emailname
End With
On Error GoTo 0
The thing is it is storing the email at the same time it opens it for display. As such any attachments would be made post save. How would I go about getting it to wait until after attachments have been made (presumably once it detects the 'Send' button has been pushed on the email)?
View 9 Replies
View Related
Apr 16, 2013
All of a sudden, deleting an entire row has become a calculation too complicated for Excel to calculate. It seems the RANGE of even a single row exceeds 33,000 cells - and therefore I get a warning that this could take a long time. Ignoring this warning does no good - Excel then tells me it couldn't do it. "Excel cannot complete this task with available resources. Choose less data and or close other applications."
In another seemingly related problem, I used a macro to automatically extend my formulas down 15,000 rows. I had hoped that I'd never have to drag down formulas again. But instead, this action created a much larger range of cells Excel now seems to consider "active." That means I can no longer use my scroll wheel, for example, to navigate my 300-row spreadsheet, because the scroll wheel seems to move the cursor up and down as a percentage of the total document length - a length now 15,000 rows long - and whatever percentage of that length each click of the scroll wheel was supposed to cover is now too miniscule to notice.
How do I make this spreadsheet "small" again?
And am I right in believing I should just convert the thing to a table?
View 1 Replies
View Related
May 21, 2014
How to modify the below vba code? It sends an email with an attachment right away after pressing the macro button. I would like the user to see the email in outlook before it gets send... and then press 'send' in Outlook .....
Sub Mail_ActiveSheet()
'Working in Excel 2000-2013
'For Tips see: http://www.rondebruin.nl/win/winmail/Outlook/tips.htm
Dim FileExtStr As String
Dim FileFormatNum As Long
[Code] .....
View 1 Replies
View Related
Apr 15, 2014
Is it possible for a Macro to read a cell say D:11 and copy that email address and send the active sheet to that email?
View 9 Replies
View Related
Aug 3, 2007
I am trying to find a easy way to delete multiple worksheets in a workbook and then saving the workbook based on the tab name of the worksheet.
View 9 Replies
View Related
Feb 2, 2014
I am processing a fair few Invoices, which are being sent to me via e-mail as excel documents, very often they contain mistakes, a decent amount of mistakes. Usually the prices are wrong.
I keep track of every single entry on the invoice on my own document - Tracker, which I consider to be the superior/more correct document to the Invoice presented to me by my contractor.
Both of the documents have a reference number, which is a specific docket number, and horizontally, in the invoice, there is going to be a price for this docket. In my document, there is going to be a separate column for the total price.
Is it possible (I guess with VBA) to check for mistakes in the Invoice, but use the Tracker as a reference for this check.
Tracker has
columns
A - Name
B - Department
C - Date
D - Docket No.
C - Total price for the docket (calculation of E to Z)
E to Z - all smaller entries
Invoice has
columns
A - Date
B - Docket No.
C to E price for that docket, but it is spread, because departments are separated out, so each VAT account can be charged accordingly. I guess it is possible to do a separate column for the price, if it is easier to do a script that way.
Basically, I need to check if in the Invoice document, the price (C to E) for Docket No. (B) is the same as the price (C) for the Docket No. (D) in the Tracker.
I would like the wrong entries to be highlighted on the Invoice Document, so I can see straight away, that this needs attention.
Not always the price is wrong, sometimes the Docket No. is spelled incorrectly (Dyslexic contractor), hence the highlighting.
View 3 Replies
View Related
Feb 17, 2009
I need a script that will turn a excel doc into a txt doc. Thats the easy part. The hard part (at least I think it is), is I need it to be in a certain format and I'll do my best to explain that fomat below.
View 9 Replies
View Related
Sep 7, 2008
I used Scheduled Task to set up my spreadsheet to open daily. I have the code with assistance to pull out the due date items and place them into an email.
I have come across XLSTART/AUTOEXEC/ACTIVATE...ETC...
But cannot figure out the code that will automatically "enabling macro" once Scheduled Task opens the spreadsheet?
Then once the macro runs, the email with the due dates, how can this auto send without user interaction?
(currently I would have to hit send)
I am trying to make the process totally automated to open the spreadsheet at a certain time, send the email with due dates and close the spreadsheet.
Following code in ThisWorkbook--
Private Sub Workbook_Open()
Check_Date_Send_Mail
End Sub
Code in Module1--
Option Explicit
Sub Check_Date_Send_Mail()
Dim wbBook As Workbook
Dim wsSheet As Worksheet
Dim rnDate As Range, rnValue As Range
Dim stAddress As String, stMsg As String
Dim stRecipient As String, stSubject As String
Dim stPost As String
Set wbBook = ThisWorkbook
Set wsSheet = wbBook.Worksheets("Sheet1")
With wsSheet
Set rnDate = .Range("d2:t23")
End With
View 9 Replies
View Related
May 16, 2007
We use proprietary software to connect to an oracle database. The proprietary software has its own login form. I connect to 4 or 5 different databases randomly throughout the day. I wrote a script that I thought would alleviate my login woes but it doesn't work. The login, password, and database info get sent to the form but they all end up on the login line. Instead of the tab character being sent, I get a Beep generated for each line of code that is supposed to send the tab key code. My code is below and is stored in a *.vbs file.
setwshShell =wScript.CreateObject("WScript.Shell")
wshShell.AppActivate "Title Of My Login Form"
wScript.Sleep 100
wshShell.SendKeys "My Login Name"
wScript.Sleep 500
wshShell.SendKeys "{TAB}"
wScript.Sleep 500
wshShell.SendKeys "My Password"
wScript.Sleep 500
wshShell.SendKeys "{TAB}"
wScript.Sleep 500
wshShell.SendKeys "Name of My Database"
wScript.Sleep 500
wshShell.SendKeys "{TAB}"
wScript.Sleep 500
wshShell.SendKeys "~"
View 8 Replies
View Related
Mar 23, 2009
I have a sheet that needs to be sent out via email via the "send to mail recipent (as attachment)" i have tried doing it via a macro but with no joy.
View 2 Replies
View Related
Jul 12, 2014
I have used a database template from this site and changed it to suit my needs but I have a bit of a problem with some of the code. I know how to update the worksheet with the relevant userform text fields and in another project I did I have successfully sent userform text fields in the body of an email.
For this project I want to update the worksheet AND send an email at the same time. However, using the two pieces of code together is causing an error that I can't seem to solve (using my very limited vba knowledge!). The code I am working on is below and I have highlighted the line that is getting the error message. C
VB:
Private Sub cmdSubmit_Click() 'Submit new record
Dim ws As Worksheet, lRow As Long, Str As String [code]....
View 1 Replies
View Related
Mar 11, 2014
I am trying to write a macro to send mail on every Friday and also on last day of every month. If the last day of the month falls on Saturday or Sunday then the macro should mail on Friday. I have written a separate macro to send a mail. I have also written to check day(ie Monday, Tuesday etc) of today. If today is Friday or month end i can send mail. I dont know how to tell the macro to send mail on friday if the month last date is saturday or sunday.
Sub done()
Dim Dat As Date, x As Integer, y As Date, sorry As String
Dim str As String
sorry = "Today is not friday or month end. So i cannot send mails"
str = WeekdayName(Weekday(Now()))
[Code] ........
View 1 Replies
View Related
Jul 13, 2009
I am trying to do it write some code which will take the activesheet & allow me to email it as an attachment (outlook) - sounds simple, but it's proving a nightmare
View 9 Replies
View Related
Jun 27, 2006
way to send only one worksheet of a workbook to an email contact as an attachment. When your in excel you can click on file and select sent to (as attachment); however this attaches the whole workbook. I do realise that I could copy the worksheet that I want to send to another workbook by itself and then send it. However this is time consuming. Anyone know of a way to just send 1 worksheet from the workbook to an email contact as an attachment? I also know that I could copy and paste the worksheet directly into the email.
View 3 Replies
View Related
Feb 18, 2012
I have an excel sheet contains data of 500 staff code and email address . I also have their pay slips in a folder with staff code.pdf as file name. i want to send corresponding payslips through mails as attachment from the folder using excel vba My excel file is like this
staff code name email id
w4246 rajesh rajee@tm.co.in
and folder contains file w4246.pdf
View 7 Replies
View Related
Jan 17, 2013
I need to send 25 mails on daily basis to my client. All fields in mail are common except recipient and attachments. Every mail has 3 excel attchments. So i created a macro in excel which sends mail as per my requirement but picks up only one attachment from the path i have mentioned in the vb code. Whole macro is running perfectly. I just want to know what modification i should do in that code to attach more than one excel file to the mail from the path i have given. Below is the code:
Sub macro1()
Dim sFolder As String
Dim Folder As Object
Dim file As Object
Dim fso As Object
[Code]....
View 1 Replies
View Related
Feb 14, 2013
I need to know how to send an excel worksheet as an xls attachment by email.
View 2 Replies
View Related
Jul 23, 2013
I'm using Excel 2007, and when I add attachements to a spreadsheet cell (e.g. a saved email) nobody else can open the file when viewing the spreadsheet. Is there a way around this?
Currently I'm inserting it by going Object > Create from File > Browse > Select File > Display as Icon. But if the spreadsheet is emailed to anyone else or put on a staff website nobody can open the attachements.
View 8 Replies
View Related
