hai Andy

syntax pendeknya:

sub aaaa()
Application.DisplayAlerts = False
ActiveWorkbook.Save
ActiveWorkbook.SendMail "[EMAIL PROTECTED]", "test"
end sub

yang panjangnya ada di : http://groups.yahoo.com/group/XL-mania/message/4704
attachmentnya bisa dilihat di mirrornya [mail-archive]



2008/6/9 Andy Kristian (PSPE) <[EMAIL PROTECTED]>:

>  *Halo.. minta tolong nih…*
>
> *Saya mau membuat file excel yang begitu di klik satu tombol (atau cell)
> akan langsung mensave dan mengirim file tersebut lewat email.*
>
> *Bisa nggak ya??*
>
> *Terima kasih*
>
> * *
>



-- 
- abimono -

_________________________________________________________________________

http://www.abimono.com

<<image001.gif>>

Attachment: Book1.xls
Description: MS-Excel spreadsheet

Kirim email ke