[Resolvido]Editar copiar texto em campo memo em formulário com botão direito do rato

Boas,

Alguém tem ideia de como isto se faz?

Obrigado

Boas pit, de uma olhada no repositorio que postei um exemplo semelhante levando para a area de transferencia com seleção do texto com o botão direito do mouse.

Cumprimentos.

Agradeço,

mas pretendo também o inverso, copiar e colar
no campo memo, algém sabe?

Cptos

Amgo.. se observar o relatorio que é aberto, e utilizado o comando colar...
Copia no campo, e cola no relatorio..

basta adaptar.

Cumprimentos.

Podes utilizar o codigo em varios eventos, teclas etc...


Cumprimentos.

Boas a resolução aqui,
mas com um botão:


Private Sub BtColar_Click()
Seucampo.SetFocus
'Seucampo.SelStart = Len(Seucampo.Text)'aqui acrescentava ao texto existente
Seucampo.SelLength = Len(Seucampo.Text)
DoCmd.RunCommand acCmdPaste

End Sub

Private Sub BtCopiar_Click()
Seucampo.SetFocus
If Seucampo.Text = "" Then Exit Sub

Seucampo.SelStart = 0
Seucampo.SelLength = Len(Seucampo.Text)
DoCmd.RunCommand acCmdCopy

End Sub

Obrigado

O Fórum agradece o Retorno.