Mr. Kid,
Menyambung pertanyaan dari Pak Yayat, bagaimana Script VBA nya jika extension filenya terdiri dari ber-macam2, antara lain .JPEG, .xls, .xlsm ? Terima kasih. Salam, Hendrik Karnadi ----- Forwarded Message ----- From: Yayat Ply <[email protected]> To: [email protected] Sent: Saturday, 25 August 2012, 5:23 Subject: Re: [belajar-excel] Open file secara otomatis Terima kasih Mr. Kid atassolusinya , nanti akan saya praktikan. ________________________________ From: "Kid Mr." <[email protected]> Sender: [email protected] Date: Fri, 24 Aug 2012 03:20:39 +0700 To: <[email protected]> ReplyTo: [email protected] Subject: Re: [belajar-excel] Open file secara otomatis Coba buat event worksheet before double click di VBE pada sheet tersebut. Kemudian isi dengan : dim oShellApp as object dim sFullFileName as string with target 'pada range yang di double click if .count=1 then 'hanya 1 cell if .column=7 then 'di kolom ke-7 if .row>3 then 'nomor baris excel-nya > 3 if len(.value)=3 then 'isinya hanya 3 karakter 'set nama file lengkap dengan foldernya 'ganti thiswrokbook.path dengan pathfile-nya 'seperti : D:\mydata\folderku sfullfilename=thisworkbook.path & "\" & .value & ".pdf" if lenb(dir$(sfullfilename)<>0 then 'filenya ada beneran set oShellApp=createobject("WScript.Shell") 'buat shell command oshellapp.run sfullfilename 'run file dari shell command cancel=true 'batalkan perintah double click endif endif endif endif endif end with Wassalam, Kid. 2012/8/22 Yayat Ply <[email protected]> > > Maap saya lupa melampirkannya >Nih, saya kirimkan kembali. >Terima kasih >________________________________ > >From: hendrik karnadi <[email protected]> >Sender: [email protected] >Date: Wed, 22 Aug 2012 04:44:50 -0700 (PDT) >To: [email protected]<[email protected]> >ReplyTo: [email protected] >Subject: Re: [belajar-excel] Open file secara otomatis > > >Lampirannya ga kelihatan Pak. > > >Salam, >Hendrik Karnadi > > > > >________________________________ > From: "[email protected]" <[email protected]> >To: [email protected] >Sent: Wednesday, 22 August 2012, 10:39 >Subject: [belajar-excel] Open file secara otomatis > >Selamat siang para master excel. >Mohon bantunya dan petunjuk atas masalah yg sudah saya lampirkan pada email >ini. >Sebelumnya saya ucapkan banyak erima kasih. >Maap kalau email saya terlalu singkat :) >Powered by Telkomsel BlackBerry® > >------------------------------------ > >--------------------------------------------------------------------- >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 > > > [email protected] > > > >
