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.
