Abrir objeto OLE (Word) copiar texto e colar

Moderador: Avelino Sampaio

microsap
Mensagens: 2
Registrado em: 05 Jun 2017, 01:52

Abrir objeto OLE (Word) copiar texto e colar

Mensagempor microsap » 05 Jun 2017, 02:42

Ola pessoal, gostaria da ajuda de voces,
estou com problemas em macros do access 97, e estou querendo atualizar esse banco de dados.

O banco de dados sao de questoes de prova, onde há um formulario que tem um botao de montar prova que abre uma caixa perguntado qual item/registro é para usar, isso abre uma consulta com o numero do item e a questao (objeto OLE do word) fica selecikonado.

Funcionava assim, havia um documento do Word com a capa da prova, deixavamos ele aberto,
no access clicavamos no botao montar prova, e colocavamos o numero das questoes, o access abria a questao no OLE copiava, e colava no arquivo da prova.

o banco antigo do access 97 usava os comandos de macro "sendkeys"
neste momento ele envia as teclas

Macro1
Abrirconsulta, abre a consulta1, deixando seleciona o objeto word
Enter, abria o objeto word com a questao da prova
Ctrl shift End, ia ate o final do texto
Ctrl + C, copiava o texto
Ctrl + F6, alternava entre o Word OLE e o Word prova
Ctrl END ENTER, ia para o final, acdrecentava uma linha
#99#, inseria o texto #99#, que depois o Word usaria para numerar as questoes
Ctrl + V, colava o texto
Ctrl + F6, volta para objeto do word
Fechar Janela

Assim sucessivamente para todas as questoes.

O que aconteceu, virus em alguns computadores me fizeram formatar, instalei de novo o Office 97,
mas ele nao aceita mais os comandos "sendkeys", diz para instalar o utilitario do menu principal.
Eram 4 maquinas e a macro so funciona em um que nao formatei.
Li muito na intenet que esse comando "sendkeys" dá muito problema, e que a alternativa seria VBA,
Ja até estudei e vi como fazer.
Estou querendo atualizar o banco de dados para o ACCESS mais novo, abro o banco nele e ele pede para atualizar de mdb para accdb.

Nao estou conseguindo abrir o objeto Word atraves desse comandos.

A Macro1 abre a Consulta1
A Consulta1 tem "Questao / Item" que buscam na tabela ficha (tabela principal onde tem todos os dados)

DaÍ nao consigo abrir o Objeto do Word, para fazer os procedimentos.

Alguem pode dar uma luz.....
Desde já muito obrigado.

Disable adblock

Precisamos do seu apoio. Faca uma doacao para o site atraves do Paypal.


microsap
Mensagens: 2
Registrado em: 05 Jun 2017, 01:52

Re: Abrir objeto OLE (Word) copiar texto e colar

Mensagempor microsap » 08 Jun 2017, 13:05

Bom dia pessoal resolvi o problema e resolvi compartilhar.

O problema é o uso do comando "sendkeys" no windows 7,

por padrao o controle de conta de usuario (UAC) fica ativo, é só desabilitar que funciona.

Para isso, execute o regedit em modo administrador:

HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System

EnableLUA - coloque o valor 0 (zero) em REG_DWORD.

Reinicie o computador.

Pronto.


Voltar para “Access x Word”

Quem está online

Usuários neste fórum: Nenhum usuário registrado e 1 visitante