Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
E-mail macro - Field Validation
All, I currently have a requisition form used in order to provide information to our admin person to log in and have purchase req's approved. I am using a button assigned with a macro to have it automatically send the sheet as an e-mail attachment (using outlook) to the admin person. Is there a way to have certain fields or cells required to be filled in before the macro works, perhaps giving an error message of some sort? Thanks, FOLLOWING IS THE MACRO CURRENTLY ASSIGNED: Sub Mail_ActiveSheet_Outlook() 'You must add a reference to the Microsoft outlook Library Dim OutApp As Outlook.Application Dim OutMail As Outlook.MailItem Dim wb As Workbook Dim strdate As String strdate = Format(Now, "dd-mm-yy h-mm-ss") Application.ScreenUpdating = False ActiveSheet.Copy Set wb = ActiveWorkbook With wb .SaveAs "SubK PO Req.xls" Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .To = " .CC = "" .BCC = "" .Subject = "New SubK PO Requisition" .Body = "Please find attached PO Requisition form. Thank you and have a nice day." .Attachments.Add wb.FullName 'You can add other files also like this '.Attachments.Add ("C:\test.txt") .Send 'or use .Display End With .ChangeFileAccess xlReadOnly Kill .FullName .Close False End With Application.ScreenUpdating = True Set OutMail = Nothing Set OutApp = Nothing End Sub -- tqdinh22 ------------------------------------------------------------------------ tqdinh22's Profile: http://www.excelforum.com/member.php...o&userid=36453 View this thread: http://www.excelforum.com/showthread...hreadid=573184 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how do i mail a macro in my personnel macro workbook | Excel Discussion (Misc queries) | |||
abdualmohsn | Excel Discussion (Misc queries) | |||
Macro to change validation list and print | Excel Discussion (Misc queries) | |||
Selecting from a Validation Drop Down Box aborts macro | Excel Worksheet Functions | |||
Input message on data validation field | Excel Discussion (Misc queries) |