Terima kasih Mr. Kid atassolusinya , nanti akan saya praktikan.
-----Original Message-----
From: "Kid Mr." <[email protected]>
Sender: [email protected]
Date: Fri, 24 Aug 2012 03:20:39
To: <[email protected]>
Reply-To: [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
>
>
>
>
>
>
>
