Assalamu'alaikum Wr. Wb.
Coba script berikut disesuaikan dengan keadaan real di lapangan dan
dikembangkan pemanfaatannya.
dim sFile as string
application.displayalerts=false
with thisworkbook
.save
sfile= .path & "\namafilesalinan.xls"
.savecopyas sfile
setattr sfile,vbreadonly
end with
application.displayalerts=true
Wassalamu'alaikum Wr. Wb.
Kid.
2013/3/5 Heru Safrudin <[email protected]>
> Dear Master,
>
> Saya punya file master yang saya gunakan sebagai interface, saya ingin
> copy file master tersebut ke share folder dengan attribut Readonly
> dengan sekali klik.
> Bagaimana penulisan code/macronya ?
>
> --
> Terima kasih
>
> وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
> Heru Safrudin
>
>
> ------------------------------------
>
> ---------------------------------------------------------------------
> bergabung ke milis (subscribe), kirim mail kosong ke:
> [email protected]
>
> posting ke milis, kirimkan ke:
> [email protected]
>
> berkunjung ke web milis
> http://tech.groups.yahoo.com/group/belajar-excel/messages
>
> melihat file archive / mendownload lampiran
> http://www.mail-archive.com/[email protected]/
> atau (sejak 25-Apr-2011) bisa juga di :
> http://milis-belajar-excel.1048464.n5.nabble.com/
>
> menghubungi moderators & owners: [email protected]
>
> keluar dari membership milis (UnSubscribe):
> kirim mail kosong ke [email protected]
> ---------------------------------------------------------------------Yahoo!
> Groups Links
>
>
>
>
