Oh ada error ya...
Biasanya karena bagian berbunyi :
,schedule:=false
diprosedur bernama aktifkan.
Untuk hal ini, bisa dicoba salah satu dari cara ini :
Cara 1 :
- tambahkan sebelum baris application.Ontime :
On error resume next
- tambahkan sebelum baris end sub :
Err.clear
On error goto 0 'angka nol ya
Cara 2 :
- copy baris application.ontime bla bla
- paste tepat di baris sebelum application.ontime yang di-copy
- jadi ada 2 baris application.ontime yang sama persis dan berurutan atas bawah.
- pada baris application.ontime yang atas, hapus bagian :
,schedule:=false
- jangan ubah baris application.ontime yang bawah
- konsepnya, dibuat ulang schedule ontime nya lalu langsung di-stop oleh baris
berikutnya
Regards,
Kid
Sent from my smart enough phone
> On Mar 2, 2016, at 08:39, 'Dede Sulaeman' [email protected]
> [belajar-excel] <[email protected]> wrote:
>
> Dear Mr Kid,
>
>
>
> Mohon pencerahannya untuk file terlampir, makro blm bisa bekerja di jam yang
> ditentukan.
>
> Salah dimana yah Mr.....?
>
>
>
> Salam,
>
> DD
>
>
>
> From: [email protected] [mailto:[email protected]]
> Sent: 01 Maret 2016 17:47
> To: BeExcel
> Subject: Re: [belajar-excel] Makro bekerja di jam yang ditentukan
>
>
>
>
>
> Hai DD,
>
> Mungkin begini :
>
> 1. buat prosedur yang dipanggil, misal bernama Aktifkan, dan isi dengan
> script :
>
> application.ontime thisworkbook.sheets("nama sheetnya").range("alamat
> range berisi time bertipe time").value, "Aktifkan",schedule:=false
>
> 2. isi event workbook open atau di prosedur lain yang akan dijalankan oleh
> event workbook open bunyi berikut :
> application.ontime thisworkbook.sheets("nama sheetnya").range("alamat
> range berisi time bertipe time").value, "Aktifkan"
>
>
>
> Wassalam,
>
> Kid
>
>
>
>
>
>
> 2016-03-01 13:04 GMT+07:00 'Dede Sulaeman'
> [email protected] [belajar-excel]
> <[email protected]>:
>
>
>
> Dear BeExceller,
>
>
>
> Mohon pencerahan untuk case ini.
>
> Harapannya adalah makro baru bekerja di jam yang ditentukan, pada kasus ini
> jam saya tentukan di sheet1 range a1.
>
> Pada saat jam 13:00 sheet2 akan aktif.
>
>
>
> Salam,
>
> DD
>
>
>
>
>
> <Time.xlsm>