View Single Post
  #2   Report Post  
jahoobob
 
Posts: n/a
Default


525047 Wrote:
I want to be able to complete an XLS and then click on a button to email
the completed file and if possible save it too. Is there a way to set up
a button to do this on a sheet?

Place the following in a Macro:
Sub Macro1()
ActiveWorkbook.Save
ActiveWorkbook.SendMail "
End Sub

Place the your recipient's name in the quotes

Now lets place a button on your menubar

Right click a blank area of the menus and select Customize.
On the Commands tab, move down the list and select Macros.
Drag the Custom button to any menu bar.
Click on the button with the right button and select Assign Macro
Select the appropriate macro and the OK
If you want a different button, select Change button image.
Close the Customize window.
You may get a message each time you run this if your company has it set
up so that tells you something about a program trying to send something.
When the Yes button shows black letters, click it and the spreadsheet
is sent.
I hope this does what you want.
Bob


--
jahoobob