Minggu, 15 April 2018

[belajar-excel] Digest Number 4486

1 Message

Digest #4486

Message

Sat Apr 14, 2018 9:49 pm (PDT) . Posted by:

"NangAgus"

Dear Yusuf:

Coba cekrip:

Edate = Format("31/08/2009", "DD/MM/YYYY") ' Replace this with the date
you want

diubah menjadi:

Edate = Format("30/04/*2018*", "*dd/mm/yyyy*") ' Replace this with the
date you want

Jabat erat
NangAgus

On 4/13/2018 1:51 PM, hendrik karnadi hendrikkarnadi@yahoo.com
[belajar-excel] wrote:
> Hai Yusuf,
> Skg kan sdh 2018...jadi workbook ga bisa dibuka.
> Kalau mau jalankan macroya...date yang ada di komputer dimundurin dulu.
>
> Salam,
> HK
>
>
> On Friday, 13 April 2018, 1:20:16 PM GMT+7, y.roni35@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com> wrote:
>
>
> Saya sudah script berikut namun tidak bisa digunakan:
>
>
> Private Sub Workbook_Open()
>
> Dim Edate As Date
>
> Edate = Format("*31/08/2009*", "DD/MM/YYYY") ' Replace this with
> the date you want
>
> If Date > Edate Then
>
> MsgBox ("This worksheet was valid upto " & Format(Edate,
> "dd-mmm-yyyy") & " and will be closed")
>
> *ActiveWorkbook.Close*
>
> End If
>
> If Edate - Date < 30 Then
>
> MsgBox ("This worksheet expires on " & Format(Edate,
> "dd-mmm-yyyy") & " You have " & Edate - Date & " Days left ")
>
> End If
>
> End Sub
>
>
> Mohon dibantu scrip untuk experied date untuk Office 2010?
>
>
> Terimakasih.
>
>
>
> Yusuf
>
>

============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Tidak ada komentar:

Posting Komentar