[kapetang]

Καλημέρα

Γιώργο, δοκίμασε τον κώδικα:

Private Sub nodeAdmin_Click()
    Dim x As String
    Dim s As Variant
    If Me.nodeAdmin Then
        x = Me.nodeParent
        s = DLookup("nodeText", "MenuNodes", "nodeKey='" & x & "'")
    End If
End Sub

Φιλικά/Γιώργος