Identificar o Id do usuário

Olá,
Preciso de uma ajuda para como inserir a expresão comum em um campo de um formulário.
É seguinte: O campo é usuário: gostaria que pela expressão "usuário atual" aparecesse o id do funcionário automaticamente, após clicar. Gostaria de saber como fazer exxa expressão funcionar. Fiz assim:
1 - Propriedade do campo - Funcionário
2 - Ao clicar
3 - Contrutor de expressões
4 - Expressõesm comuns
5 - Usuário atual
6 - Fechei
E nada acontece, o que errei e como poderia aparecer o Id do funcionário nesse campo?

bom dia:
Amigo esse "Usuário" esta cadastrado numa tabela certo?
Se sim, bastaria vc vincular esse formulário a essa tabela.

na verdade achei meio confusa sua pergunta..
pode explicar melhor, mandar o exemplo do formulário em questão?

Com o arquivo...

Amigo continua muito confuso oque vc deseja, mas se estou entendo oque falta e vc colocar um código
no evento após atualizar do campo DESCRIÇÃO.
Como  perguntei antes e vc não respondeu, de onde vem o Id ?
e de uma outra tabela? Qual o nome da Tabela?
Essa tabela está vinculada?
Em meus Sistemas , tenho utilizado um código, que guarda o ID do usuário que está logando o Sistema numa tabela chamada "Usuario",
essa tabela não é vinculada fica dentro do Sistema.
Porem o ID vem de uma tabela chamada Funcionarios onde ficam todas as informações necessárias : ID, Nivel de acesso, dados pessoais, e é a claro a senha para entrar.
Quando o funcionário faz o Login o sistema pega , no meu caso 3 informações, nível de acesso, o ID e a data atual.
Sugiro que vc faça o mesmo: Crie uam tabela não vinculada par aguardar apenas as informações desejadas.
algo mais ou menos assim:
Dim Meubd As Database  ' Declara o banco de dados.
 Dim Usuario As Recordset    ' Declara a tabela.
 Set Meubd = DBEngine.Workspaces(0).Databases(0)    ' Cria uma referência ao ' banco de dados.
 Set Usuario = Meubd.OpenRecordset("Usuario")     ' Cria uma referência à tabela.

 Usuario.Index = "IndiceNumero"
 Usuario.Seek "=", 1

      If Not Usuario.NoMatch Then
       Usuario.Edit
         Usuario("CdUsuario") = [SelecionarUsuario].Column(0)----> Aqui esta sendo Guardado o ID.
         Usuario("NIvel") = [SelecionarUsuario].Column(2)----------> Aqui o nível de acesso
      Usuario("DataEntrada") =Date----------> Aqui ao data de acesso
         
       Usuario.Update
Usuario.close

     End If

No meu caso tudo é pego de uma combobox com cuja fonte de registro vem justamente da tabela funcionários.
Ela tem 3 Colunas, ID, NomeFunc, e Nivel.
Você pode adaptar a mesma função fazendo algo no evento após atualizar do seu campo DESCRIÇÃO.

Testei aqui e funcionou perfeitamente ..
Private Sub DESCRIÇÃO_AfterUpdate()
Dim Meubd As Database  ' Declara o banco de dados.
Dim SalvaUsuario
 Dim Usuario As Recordset    ' Declara a tabela.
 Set Meubd = DBEngine.Workspaces(0).Databases(0)    ' Cria uma referência ao ' banco de dados.
 Set Usuario = Meubd.OpenRecordset("Usuario")     ' Cria uma referência à tabela.

 Usuario.Index = "IndiceNumero"
 Usuario.Seek "=", 1
If Not Usuario.NoMatch Then          'usado para gravar o usuario
   SalvaUsuario = Usuario("CdUsuario")
   Usuario.Close
 End If
 
        Me!FUNCIONÁRIO = SalvaUsuario
End Sub


________
Espero te ajudado..
Um abraço


Ney Santos

Olá,
Para completar o entendimento, informo que o banco está em rede por isso, pensei que essa informação do ID pudesse ser automática. Quando o funcionário entrar no banco, colocar os dados, o Id dele aparecerá sem que ele digite seu nome e nem tenha a opção dele selecionar o seu nome, mas o numero do seu ID apareceria automáticamente. Seria possível? Como mostro no banco em exemplo, existe o campo, só que não sei como funciona nem como colocar. Não sei se consegui alcançar o entendimento, sem mais agradeço a atenção e aguardo por uma solução.

amigo meu banco tbm esta em rede , tente fazer como expliquei crie uma tabela no seu sistema , não no banco ..]
de a ale a o nome usuário.
vai funcionar..