Alternatifnya, 
- Hapus pesan pada Sheet1 maupun pada VB Scrip tnya MsgBox ("Anda punya 
kesempatan " & exdate - Date + 1 & " Hari lagi"), vbInformation, "P E S A N"
- Buat Macro tambahan untuk menghapus Sheet2 yang berisi data pada saat file 
sudah Expired, seperti saran Pak o'Seno.

Salam,
Hendrik Karnadi


________________________________
 From: hendrik karnadi <hendrikkarn...@yahoo.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com> 
Sent: Thursday, 12 January 2012, 9:57
Subject: Re: Bls: [belajar-excel] membuat file expired
 

Kalau ini masalah di level administrator. Jadi harus diset agar tanggal 
sistemnya tidak bisa diubah.
Excel kan berada di bawah Operating System, jadi untuk ngeset di Excel agar 
tanggal tidak bisa diubah kayaknya agak susah.

Salam,
Hendrik Karnadi


________________________________
 From: neza ibaneza <nezaiban...@yahoo.co.id>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com> 
Sent: Thursday, 12 January 2012, 9:37
Subject: Bls: [belajar-excel] membuat file expired
 

  
waduh... saya coba dengan memundurkan change date pada kompi saya... filenya 
bisa kebuka lagi (apakah ini kelemahan), tp masih ada passwordnya kok..... 
thanks..

mas..


________________________________
 Dari: neza ibaneza <nezaiban...@yahoo.co.id>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com> 
Dikirim: Kamis, 12 Januari 2012 10:20
Judul: Bls: [belajar-excel] membuat file expired
 




maaf nih mas hendrik... file attach yg dikirim baru sy buka email hari ini jd 
sulit untuk ngeliat hasilnya...
mohon pencerahannya untuk membukanya kembali...

neza



________________________________
 Dari: hendrik karnadi <hendrikkarn...@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com> 
Dikirim: Rabu, 11 Januari 2012 12:40
Judul: Re: [belajar-excel] membuat file expired
 




Untuk memenuhi keinginan tersebut, ada beberapa hal yang harus diperhatikan:
- Sewaktu file dibuka minimal harus ada satu Sheet, jadi jangan taruh data di 
Sheet1
- Sheet2 yang berisi data disembunyikan dengan xlSheetVeryHidden sehingga menu 
Unhide tidak dapat digunakan pada saat user mengklik kanan mouse. Sheet2 
tersebut hanya bisa dibuka dengan Password "hk"
- Pada saat Worlbook (file) akan disimpan (BeforeSave) Sheet2 yang berisi data 
akan disembunyikan lagi dan hanya bisa dibuka dengan Password
- Jika file sudah Expired dan user menonaktifkan Macro untuk mencoba mengupdate 
VBAnya, VB Script nya kita protect dengan Password.

Jadi pada saat file dibuka, Macro aktif atau non aktif, yang akan terlihat 
hanya Sheet1.

Jika Expiry date akan diubah gunakan Password "hk" dan ganti exdate nya 
("bl/tg/th")


Salam,
Hendrik Karnadi

Catatan :
Karena Password masih bisa dihack dengan Software tertentu maka usahakan 
Password nya agak panjang (mis. 8 digit) dengan kombinasi huruf dan angka. 
Tentunya Password dalam VB Script nya perlu diubah juga. 


________________________________
 From: neza ibaneza <nezaiban...@yahoo.co.id>
To: EXCEL EXCEL <belajar-excel@yahoogroups.com> 
Sent: Wednesday, 11 January 2012, 10:06
Subject: [belajar-excel] membuat file expired
 

  
dear all
saya punya file excel penting privaci yg ingin dicopy org lain ..misalnya anak 
PKL, dsb.
tapi saya ingin file tersebut expired dalam jangka waktu 60 hari saja.
karena file tersebut file penting di perusahaan

artinya file tersebut tidak bisa lagi kebuka setelah dateline tersebut.

mohon pencerahannya..

neza











 

Kirim email ke