kalau dijadikan fungsi, nilai nik.value tinggal diganti jadi argumen fungsi
saja saja.
jadi tidk pake .value --> cukup nik saja.
jangan lupa masukinnya mesti begini.
cuti(format(tanggal,"dd-mmm-yyyy"),"1234")
kalau tanpa format, biasanya tidk sama dengan dimaksud.
Function CUTI(tanggal As Date, NIK As String) As Integer
Dim TGLMAX As date
TGLMAX = DMax("tanggal", "KARYAWAN_CUTI", "[NIK] ='" & NIK & "'")
CUTI = DLookup("SISA_CUTI", "KARYAWAN_CUTI", "[NIK] ='" & NIK & "' AND
[tanggal]=#" & TGLMAX & "#")
End Function
----- Original Message -----
From: diki wahyudin
To: [email protected]
Sent: Friday, May 15, 2009 15:14
Subject: Bls: [belajar-access] cari nilai
maksih atas solusinya,
saya coba bikin fungsinya :
dan ternyata masih ada error, apakah ada yang salah dengan fungsi tersebut ?
