Este fórum foi descontinuado. LEIA AQUI e participe da Comunidade BABOO :)

Ir para conteúdo

Mensagem Recomendada

pessoal, estou usando o vba pra tentar manipular dados (copia e cola) numa janela de outro programa, vide foto.

nao sei como começar, a principio criei um pequeno codigo, mas ja deu erro

Sub teste2()
Dim Sessions As Object
Dim System As Object
Set System = CreateObject("Terminal 3270 - A - AWVL6661")
Set Sessions = System.Sessions

End Sub

mas ja deu um erro na linha 4: "Run-time error 429. ActiveX component cant create object"

eu nao entendo direito disso, nao sei se o nome de objeto eh assim mesmo que usa, ou tem outra forma de saber o nome pra parametro.

 

objeto.png

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você precisa que o VBA abra o terminal ou ele já estará aberto?

Se for para o VBA abrir você deve usar algo parecido com isso:

Dim dbAppID as Double 
dbAppID = Shell("C:\Word\Winword.exe, 1)
'coloca o foco na janela da aplicação                
AppActivate dbAppID 

Depois que a janela estiver aberta:

    'copia os dados no clipboard 
    Range("A1:B71").Select
    Selection.Copy
    
    'ativa a janela. se não funcionar tente apenas Terminal 3270
    AppActivate "Terminal 3270 - A - AWVL6661"        
    SendKeys "^V", True   'faz o ctrl+V para colar os dados            
    'se for fazer outras colagens precisa aguardar um pouco antes  
    Application.Wait (Now + TimeValue("0:00:05"))
    

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

×
×
  • Criar Novo...