Rayne
asked on
Open Table to edit in VBA
Hello,
here is a code
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("t blproduct2 000")
hideFlag = Application.DLookup("Scol1 ", "ARR2", "iCode = " & Chr(34) & rs.Fields(0) & Chr(34))
If hideFlag <> "" Then
' Stop
rs.Fields(10).Value = hideFlag
Bu i am getting an error saying it cant edit....what am i missing?
Thank you
error-Access.png
here is a code
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("t
hideFlag = Application.DLookup("Scol1
If hideFlag <> "" Then
' Stop
rs.Fields(10).Value = hideFlag
Bu i am getting an error saying it cant edit....what am i missing?
Thank you
error-Access.png
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Thank you :)