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.
>
>
>
>
>
>
