[Resolvido]Como criar macro que adcione um texto a uma caixa de texto?

Olá pessoal. preciso de uma ajuda que pra mim é bem difícil por que não acho em lugar algum a resolução! Preciso de um macro, expressão ou código que quando eu clique em um Botão ou execute um macro. E esse macro jogue, atribua ou insira um valor dentro da caixa de texto,
Ex:

Criei uma caixa de texto com o alias "TXTseção" e a coloquei dentro de um formulário chamado: "FRMseções"
Eu quero executar um comando dentro de um onclick ou um macro que jogue o valor "Seção de Pessoal" dentro da caixa de texto "TXTseção".

Se puderem solucionar isso pra mim colocando de uma forma bem simples eu agradeço se colocarem exemplos fica melhor ainda.

Desde já agradeço a todos.
att. Leão.

Olá, Leão. Bom dia

Ja tentou no Evento ao clicar no botão colocar o seguinte código

Me.TXTseção = "Seção de Pessoal"

Testa aí.



Att,


Davi

Olá amigo. obrigado pela resposta imediata!
na verdade sim ja havia feito esse teste e fiz aqui novamente e continuo não conseguindo.

olha o que aparece pra mim.

Ou seja, quando eu clico no botão abre o seguinte erro: O MICROSOFT ACCESS NÃO PODE LOCALIZAR O OBJETO 'Me.'( Se 'ME' for uma nova macro ou um grupo de macros, verifique se você salvou com o nome correto ).
Amigo se tiver outra forma ou me auxiliar no que fiz de errado.

desde ja agradeço.
att. Leão.

Veja

Amigo vou fazer o teste aqui e ja retorno se consegui ou nao.

att. Leão

Meu caro amigo deu certo o que me ensinou, so que eu ainda continuo com um problema se puder me ajudar ficarei grato.
vou colocar o exemplo aqui do que estou fazendo, resumindo eu tenho uma consulta que faz referencia a duas tabelas, uma chamada seção e uma outra chamada material, e tenho materiais cadastrados em cada seção e minha consulta me retorna todos materiais cadastrados na seção como por exemplo STI. e crei um FORM que tem botões de navegação que quando clico ele abre um form que contem a consulta em modo folha de dados, o que eu preciso é o seguinte que quando eu clique no botão ele atribua o valor nome da seção dentro da caixa de texto, exemplo Me.Txtcritério = "STI"
e no critério da consulta no campo NOmeSeção ele receba esse valor "STI"
ou seja! quero que quando eu clicar nos botoes com os nomes da seção ele mude o critério da consulta exibindo a seção especifica de cada uma.

so que com um pequeno detalhe. que ele não abra nenhuma caixa de diálogo me pedindo pra digitar critério nenhum.
no exemplo que eu to tentando fazer ele fica abrindo uma caixa de dialago pedindo o critério da consulta.
desde ja agradeço.
att. Leão

Ai está o exemplo
e outra coisa ele quando abre a consulta dentro desse FORM ta abrindo estranho não sei o por que! quando abro a consulta separada ela exibe os dados corretos e a mesma dentro do FORM não. sabe dizer o que é!?

Veja o Form Frm_Exibe_Materiais se é isso que precisa...

Amigo cheguei em casa estou instalando o access 2010 aqui meu anterior era 2007 ai nao abre o exemplo que me mandou assim que eu instalar vou ver o arquivo que me mandou e testar! agradeço e jaja lhe mando a resposta!
att.Leão

Amigo é praticamente isso que eu preciso! so que eu preciso que funcione com os Botões. é essa mesma a linha de raciocionio!

será que tem uma forma de fazer isso que vc fez com a caixa de listagem! so que com os boões?
desde já agradeço.
att.Leão

Ta aí Leão...


Att,


Davi

Obrigado Professor. é exatamente isso. que eu precisava.
eu vo estudar aqui pra ver meu erro. mas se puder adiantar sabe me dizer o que eu errei!?
mais uma vez agradeço por me honrrar com seus conhecimentos.
att. Leão

Basta analisar as alterações da consulta. O erro estava na forma de referenciar os campos da tabela "Exp1" Exp2", etc... e no critério.

Resolveu ta valendo, sucesso pra vc.

Amigo, eu consegui fazer aqui colocar no meu projeto principal e funcionou, mas ainda tem um pequeno problema que na verdade pra mim é um grande...

se você reparar ai no exemplo que vc me mando ele tem tres botoes quando clica tipo no botao "NAVEGAÇÃO" ELE ABRE "HIDRAULICA" se clicar de novo em "HIDRAULICA" ele vai abrir corretamente "HIDRAULICA".
se eu clicar no outro botao ele nao vai abrir nada a nao ser que eu click de novo no mesmo.
o que eu posso fazer para concertar isso!?
att. Leão

Você deve atualizar o seu subform sempre que o critério seja alterado então no Evento ao clicar dos seus botões você acrescenta o código que está em vermelho.
Cada vez que você clica no botão ele primeiro altera seu crtério depois atualiza seu subform


Private Sub BTNhidraulica_Click()
Me.TxtCriterio = "HIDRÁULICA"
Me.abridor.Requery
End Sub
Private Sub BTNnavegacao_Click()
Me.TxtCriterio = "NAVEGAÇÃO"
Me.abridor.Requery
End Sub

Private Sub BTNsti_Click()
Me.TxtCriterio = "STI"
Me.abridor.Requery
End Sub

Private Sub Form_Load()
Me.TxtCriterio = "HIDRÁULICA"
Me.abridor.Requery
End Sub


Sucesso!!! e um ótimo final de semana.
Att,

Davi

Opa resolveu minha pane! agradeço mais uma vez professor!
tenha um ótimo final de semana e familia!
que Deus esteja com você!
att. Leão