Membuat Excel Expired dengan Macro

Membuat Excel Expired dengan Macro - Sejatinya ini merupakan tutorial lajutan sebelumnya yaitu Membuat Aplikasi Demo dengan Macro, segaja dirubah judulnya . Untuk membuat demo dengan masa tenggang hari ada yang perlu digaris bawahi meskipun sebenarnya tidak perlu digaris bawahi juga tidak mengapa, baik cara membuat demo metode pertama kedua dan ketiga masing masing mempunyai kelemahan sebagaimana kelemahan VBA yaitu "Semua scrip atau kode macro yang ada buat tidak akan bekerja ketika macro tidak diaktifkan", oleh karenanya saya tidak pernah megajarkan bagi annda pengemang aplikasi untuk memberikan demo pada aplikasi premium hanya dengan mengancalkan scrip atau kode macro

Cara yang paling ampuh membuat demo yaitu dengan aplikasi pihak ketiga, seperti Excel to Exe yang pernah saya bahas beberapa waktu lalu atau membuat sendiri degan batuan VB 6.0

MEMBUAT EXCEL EXPIRED

Abaikan garis bawah diatas, sekarag metode ketiga cara membuat aplikasi demo dengan menggunakan kode macro, cara ketiga ini lebih flexible dan terlihat profesioanla dibanding dengan metode pertama dan metode kedua

Kode macronya adalah

Private Sub Workbook_Open()
tanggal = Date + 10
End Sub

Angka 10 merupakan jumlah hari, jadi tanggal saat aplikasi aktif ditambahkan dengan jumlah hari. Misalkan tanggal aktifya adalah 1 Oktober 2017 dan masa aktifya adalah 10 hari maka tepat tanggal 11 Oktober 2017 aplikasi mencapai batas demo

Private Sub Workbook_Open()
tanggal = Date + 10
If Date = tanggal Then
MsgBox "Masa demo aplikasi sudah habis, silahkan hubungi admin", , "Demo kadaluarsa"
ThisWorkbook.Save
End If
MsgBox "Masa demo sampai tanggal " & Format(tanggal, "dd mmmm yyyy")
End Sub

Letakan kode macro diatas didalam thisworkbook, ganti angka 10 sesuai dengan jumlah hari yag ada kehendakisimpan dan selamat anda telah berhasil membuat demo aplikasi.



Demikianlah cara membuat demo aplikasi VBA, semoga dapat dipahami alur serta logikanya dengan baik dan benar, kritik untuk operator Telkomsel kenapa saat hujan melanda kecepatan internetnya turun drastis ?? Jawabanyan "Kritik ini tidak pernah sampai ke Telkomsel"

Selamat siang dan semoga anda dalam keadaan sehat sentausa selalu dalam lindungan Allah yang Maha Kuasa.

Download - 423 Sampel Excel VBA dijmain mahir VBA

 Order Aplikasi Murah dengan design premium Info Disini