Kl sy coba artikan berarti untuk bagian rngdataku.cells(1,1).value = "" harus dilakukan berulang kali sampai ke rngdataku.cells(n,n) ??? atau bagaimana ?
________________________________ From: Kid Mr. <[email protected]> To: [email protected] Sent: Thursday, June 21, 2012 4:30 PM Subject: Re: [belajar-excel] Menampilkan message alert dengan kriteria tertentu oops salah... jika variabel today diberi () maka menjadi variabel array. Andai yang dimaksud adalah menyimpan sebuah data tanggal dalam sebuah variabel, dim dtTglHariIni as date dttglhariini=date jika ingin menyimpan suatu object range dalam sebuah variabel, dim rngDataKu as range set rngdataku=range("e3:e5000") Kemudian, suatu kondisi IF dengan operator perbandingan sebuah nilai misal membandingkan cell e3 dulu : IF dttglhariini > dttglhariini-1 AND rngdataku.cells(1,1).value = "" then dst Kid. 2012/6/21 Leonardo Endry widodo <[email protected]> > >Sudah dicoba ganti & dengan AND tetapi masih terdapat type mismatch pada tanda >- >Sub Test() >Dim today() As Date >Dim range As range > > >If today() > today() - 1 and range("E3:e5000") = "" Then >a = MsgBox("test") >ElseIf today () > today() - 2 and range("e3:e5000") = "" Then >b = MsgBox("test") >Else: c = MsgBox("ok") > > >End If >End Sub > > > >________________________________ > From: Kid Mr. <[email protected]> >To: [email protected] >Sent: Thursday, June 21, 2012 4:14 PM >Subject: Re: [belajar-excel] Menampilkan message alert dengan kriteria tertentu > > > > >Coba ganti & dengan AND > >Kid. > > >2012/6/21 Leonardo Endry widodo <[email protected]> > > >> >>Kakak" yg ganteng" dan cantik", mohon bantuannya untuk menampilkan message >>alert dengan kriteria tertentu >>Sample file dan keterangan lainnya include didalamnya. >> >> >>Terima Kasih. > > >
