[anestaki]

Γιώργο σε ευχαριστώ πολύ.
Άλλαξα τα ονόματα στα πεδία του πινάκα MenuNodes σε noteUsers" & Me.lngEmpID και στην MenuNodesQuery και με την προσθήκη " & node & " δουλεύει άψογα.
Έχω ακόμη μια ερώτηση με τιs παρακάτω γραμμές κανό προσθήκη μια στήλη κάθε φορά που εγγράφετε ένας χριστείς αλλά δεν είναι Yes/no.

Set db = CurrentDb()
Set tdf = db.TableDefs("MenuNodes")
Set fld = tdf.CreateField("noteUsers" & Me.lngEmpID, dbBoolean)
fld.DefaultValue = True
tdf.Fields.Append fld