[Resolvido]"Zoom" na Caixa Texto

Boa tarde a todos
Garimpando aqui no forum, descobri esse excelente exemplo...
https://www.maximoaccess.com/t12103-abrir-um-form-de-pesquisa-baseado-na-caixa-texto-clicada-com-as-mesmas-informacoes

Cai como uma luva para o que to fazendo.
Adaptei o código para 2 exemplos:
1) Form processo - o sub form  funciona sozinho, todavia abrindo pelo for processo não.
2) Form processo 1- coloquei 2 campos no form pesquisa 1 e não roda.

Outra duvida.
Como faço para permitir paragrafo nesses campos? Anulando o teclado. Já que a tecla enter e outras interferem?

Anexo o projeto e o código original
Obrigado

Item 1 (mude para isto)

Private Sub btnAmpliarResposta_Click()
DoCmd.OpenForm "Pesquisa", acNormal
[Forms]![Pesquisa].[txtMemo] = Me.DecisaoJudicial
End Sub


Item 2:

Mude os campos txtMemo e txtMemo2 para Nao Acoplado ( va na fonte de controle do campo e apague o tem la.) e coloque este Codigo na Lupa:

Private Sub btnAmpliarResposta_Click()
DoCmd.OpenForm "Pesquisa1", acNormal ' Abre o Formulario
[Forms]![Pesquisa1].[txtMemo] = Me.DecisaoJudicial 'Passa o de um formulario para o outro
[Forms]![Pesquisa1].[txtMemo1] = Me.RespostaDecisao
End Sub

Fiz as mudanças sugeridas e não rolou.
tem como permitir o paragrafo?

Estranho não ter Funcionado... Veja aqui seu Exemplo.

Agora Paragrafo eu não sei como amigo...

Ok.
Vou ver o que deu errado por aqui.
irei comparar para aprender.
Vou deixar em aberto, talvez alguém saiba como colocar paragrafo.
Obrigado Fábio

Uma rápida pesquisa aqui no Fórum encontrei o que precisa amigo.

Veja:

Ok.
Vou testar depois da janta.
E respondo.
Obrigado.

Oi.
Fábio.
Sua dica foi ótima.
Achei uma dica no fórum.

https://www.maximoaccess.com/t4016-resolvidocomo-adicionar-um-novo-paragrafo-dentro-de-uma-caixa-de-texto


Criei uma msg unindo sua dica com a do Críquio.
Vou deixar para aqueles que precisarem.
Muito obrigado por tudo.
Abs