[Resolvido]Copiar várias linhas de um form contínuo e colar em outro.

Boa tarde amigos do fórum.
Gostaria que me ajudassem a resolver um problema, já pesquisei por tudo e ainda não consegui resolver pois ao usar o código de copiar aparece a seguinte mensagem:
O comando ou ação 'Copiar' não está disponível agora.

O que eu preciso é escrever o código no botão que faça o que a combinação CTRL+C e CTRL+V fazem, pois se eu selecionar várias linhas e usar CTRL+C depois clicar no subform vazio e usar CTRL+V ele funciona, o que eu quero é fazer isto com várias linhas.

Exemplos:

Quando eu filtro e seleciono o que eu quero:


Quando eu abro a tela que vai receber o que foi copiado para a área de transferência (comando CTRL+C)


Quando eu colo os dados da área de transferência (comando CTRL+V)


As combinações de teclas CTRL+C e CTRL+V funcionam perfeitamente, o que quero um botão para copiar e outro para colar que façam isso...
Alguém pode me ajudar ???

Olá Claudinei,

Tente para copiar:

DoCmd.RunCommand acCmdCopy

Tente para colar:

DoCmd.RunCommand acCmdPaste

Boa noite good guy

Seguinte, eu já tentei o comando DoCmd.RunCommand acCmdCopy é exibida a seguinte mensagem:



Só funciona quando uso as combinações de tecla CTRL+C e CTRL+V. O que eu quero é criar um botão para copiar as linhas que eu selecionar e outro para colá-las no subForm de destino.

Olá Claudinei,

Não entendi bem qual foi o problema apresentado. Posta o bd para examinarmos por favor.

Boa tarde good guy.

Seguinte...

O meu problema está nesse botão para copiar as linhas que eu quero


Esse é o código do botão


Quando eu seleciono por exemplo 3 linhas e uso o atalho do teclado CTRL+C e vou na tela de destino e uso CTRL+V funciona perfeitamente, mas o que eu quero na verdade é um botão para copiar as linhas que selecionei e na tela de destino um botão para colar o texto copiado.

Olá Claudinei,

Código:

mas o que eu quero na verdade é um botão para copiar as linhas que selecionei e na tela de destino um botão para colar o texto copiado.

Posta o bd por favor ou uma amostra dele.

Boa tarde Good Guy

Segue o bd e a sequência de funcionamento para que entenda...

1º eu clico no botão [lançar todos de uma vez] para escolher mais de um talhão


2º Supondo que eu quero lançar dos talhões 10 ao 17 eu seleciono os registros


Aqui é que o bicho tá pegando...
Eu quero que ao clicar no botão [copiar selecionadas] o programa copie o que eu selecionei (dos talhões 10 ao 17) para a área de transferência para que eu cole na tela de lançamento de talhões

3º Volto para a tela de lançamento de talhões seleciono o [*]e colo o que copiei para a área de transferência


4º Assim que teria que funcionar


Obs. Eu preciso de um botão que copie várias linhas para a área de transferência e outro que cole o que está na área de transferência.
Se eu usar o comando CTRL+C e CTRL+V funciona perfeitamente, só que eu quero um botão que faça o que a combinação de teclas faz.

Olá Claudinei,

O que eu percebi que seria mais fácil alcançar seu objetivo seria :
1)Com o botão direito do mouse copiar os registros selecionados ao manter a tecla SHIFT pressionada e
2)Depois colar pelo mesmo processo no último registro do formulário principal ao clicar na barra lateral.

NOTA: Se você tentar utilizar qualquer código para copiar os registros selecionados através de um botão não conseguirá isso porque a seleção dos registros desaparecerá. Em um subformulário é diferente de uma caixa de listagem onde a gente pode selecionar os registros pela propriedade MultiSelect e depois através de um botão manipular os registros selecionados.

Boa noite good guy!

Entendi, estou usando um subformulário ao invés de uma caixa de listagem.
Obrigado pela explicação...

Vou dar o tópico por resolvido!
Feliz 2018 a todos os colegas do fórum !