Hi all,

I'm using DLookup to get a amount.

Which table to be use, is decide by another function.
So table name is pass into a string.

Dim TableName as string
TableName = anotherfunction

Me.txt_Amt.Value = DLookup("[Entr&Sub_1yr]", "& TableName &", "[MembershipCategory] = '" & Forms![subfrm_IndiApplicationApproval]![cbo_CategoryGrant] & "'")

My error is highlight in red. Please teach me how to use.

Thanks

Me.txt_Amt = DLookup("[Entr&Sub_1yr]", TableName, "[MembershipCategory] = '" & Forms.[subfrm_IndiApplicationApproval].Form.[cbo_CategoryGrant] & "'")



Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

Oh, and I don't know what mischief that ampersand (&) in your field name Entr&Sub_1yr will do to your VBA code and query execution. I would remove it from any field name, e.g. Entr_Sub_1yr instead.


Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

Oh, thank you very much!!!
It work so well.