Notifications
Clear all

Copiar dados de uma planilha .dqy

21 Posts
3 Usuários
0 Reactions
2,698 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Prezados, boa tarde!

Estou tendo uma dificuldade um tanto quanto peculiar.
Estou trabalhando em uma base de dados que é retirada de um sistema, através de um excel que funciona como uma "máscara" para uma pesquisa em sql.
Por exemplo, ao abrir esse arquivo formato .dqy, ele busca na base de dados, todas as informações referentes a um banco de dados X, e traz essa informação para o Excel.

O que eu estou tentando fazer, estou tentando fazer uma macro, em que essa pesquisa seja aberta, filtrada, copiada e colada um novo excel.
Até a parte do filtrar, copiar e colar, tudo muito simples, minha maior dificuldade é. Como fazer para ele abrir o arquivo, e colocar a senha.

Podem me ajudar?
Não sei se me fiz entender, o que vocês precisam? Do arquivo com a consulta? Algo do tipo?
Não sei por onde começar!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 29/07/2014 12:26 pm
Basole
(@basole)
Posts: 487
Reputable Member
 

Qual é sua base de dados? (access, sql, mysql, postgresql, dbf, etc)

Click em se a resposta foi util!

 
Postado : 30/07/2014 6:37 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia!!

Não sei por onde começar!

Use a pesquisa do fórum!!
http://www.google.com.br/cse?cx=partner ... gsc.page=1

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/07/2014 6:50 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia!!

Não sei por onde começar!

Use a pesquisa do fórum!!
http://www.google.com.br/cse?cx=partner ... gsc.page=1

Att

Obrigado pela ajuda, mas infelizmente ela não surtiu efeito, o problema é que estamos falando de um arquivo .dqy, e não com padrões de senha de arquivos normais. Infelizmente, é mais complicado =/

Qual é sua base de dados? (access, sql, mysql, postgresql, dbf, etc)

Basole, trabalho hoje com uma base de dados mysql.
Na verdade essa área é um pouco complexa pra mim, não tenho muito conhecimento, os responsáveis pelo sistema, fizeram uma pesquisa direta na base de dados, que trazem as informações que quero transportar para a planilha.
Segue o código:

XLODBC
1
DSN=netfactor;UID=consulta;APP=Microsoft Office 2010;WSID=ALEXANDRE-PC;DATABASE=netfactor
select distinct ing.ingdocumento as DOCUMENTO, ing.empCodigo as EMPRESA, ing.ingvencimento as VENCIMENTO,     ing.Idgcodigo as IDG, foc.fneDescricao as FOCO_NEGOCIO, tpp.tpaDescricao as TIPO_PAPEL, sit.sitDescricao as SITUACAO,    ing.ingValordeFace as VALOR, ing.cedcodigo as COD_CEDENTE, ced.pesCNPJCPF as CNPJ_CEDENTE,     pesced.pesnome as NOME_CEDENTE,     ing.sacCodigo as COD_SACADO, pessac.pesCNPJCPF as CNPJ_SACADO, pessac.pesNome as NOME_SACADO, ing.ingNN as NN, ing.ingdataope as DATA_OPE, sac.filFiltro as PAGADORIA,    ing.ingdataliquidacao as DATA_LIQ, ing.eveCodigo as EVENTO_LIQ, eve.eveDescricao  as DESC_EVENTO_LIQ, ing.ingdesagio as DESAGIO, ope.opeDesagioFator as TX_DESAGIO, ope.opeCodigo as OPERACAO    from nfIngressos ing          left join nfCedente ced on ced.cedCodigo = ing.cedCodigo and ced.empCodigo = ing.empCodigo          left join nfPessoa pesced on pesced.pesCNPJCPF = ced.pesCNPJCPF          left join nfSacado sac on sac.sacCodigo = ing.sacCodigo and sac.empCodigo = ing.empCodigo          left join nfPessoa pessac on pessac.pesCNPJCPF = sac.pesCNPJCPF        left join nfIdentificadorGlobal idg on idg.idgCodigo = ing.idgCodigo        left join nfFocoNegocio foc on foc.fneCodigo = idg.fneCodigo        left join nfTipoPapel tpp on tpp.tpaCodigo = idg.tpaCodigo        left join nfSituacao sit on sit.sitCodigo = idg.sitCodigo    left join nfEvento eve on eve.eveCodigo = ing.eveCodigo  left join nfOperacao ope on ope.opeCodigo = ing.opeCodigo and ope.empCodigo = ing.empCodigo    


ingdocumento	empCodigo	ingvencimento	Idgcodigo	fneDescricao	tpaDescricao	sitDescricao	ingValordeFace	cedcodigo	pesCNPJCPF	pesnome	sacCodigo	pesNome	ingNN	ingdataope	filFiltro	ingdataliquidacao	eveCodigo	eveDescricao	ingDesagio	opeDesagioFator		OPERACAO

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/07/2014 7:27 am
Basole
(@basole)
Posts: 487
Reputable Member
 

Deixa eu ver se entendi. Vc ja consegue obter os dados do dqy para sua planilha?

Click em se a resposta foi util!

 
Postado : 30/07/2014 8:35 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Experimentou "passar" a senha na query?
Não tenho certeza mas creio que seira algo +/- assim:
--> DSN=netfactor;UID=consulta;APP=Microsoft Office 2010;WSID=ALEXANDRE-PC;PSW=SuaSenha;DATABASE=netfactor

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/07/2014 8:36 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Basole,
eu estava tentando, e agora eu consigo buscar sim...
Mas ele me pede senha, olhe a imagem

Reinaldo, tentei... Mas não funcionou rsrs

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/07/2014 9:32 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Estou anexando a consulta

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/07/2014 9:34 am
Basole
(@basole)
Posts: 487
Reputable Member
 

tente entao: Selecione "Usar conexao Confiavel" e depois em "OK" . Em seguida procure a opçao "propriedades" para poder editar e selecionar os campos que deseja cosultar na tabela.

Click em se a resposta foi util!

 
Postado : 30/07/2014 9:39 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bassole,

Desculpe, não compreendi.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 30/07/2014 12:25 pm
Basole
(@basole)
Posts: 487
Reputable Member
 

Na caixa de Logon(Logon SQL Server), Selecione "Usar conexao Confiavel" e depois em "OK" . Em seguida procure a opçao "conexoes" ou "propriedades" para poder editar e selecionar os campos que deseja cosultar na tabela.

Click em se a resposta foi util!

 
Postado : 30/07/2014 12:53 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Se eu tento utilizar a conexão confiável, o resultado é este da imagem abaixo:

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 31/07/2014 8:16 am
Basole
(@basole)
Posts: 487
Reputable Member
 

Acredito que nao tem jeito, tem que pegar o user e senha com quem criou o servidor SQL.

Click em se a resposta foi util!

 
Postado : 31/07/2014 11:44 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

O user e senha eu tenho.
Eu só gostaria que o VBA colocasse essa informação...
Gostaria que na tela, ele alimentasse com a senha, e buscasse a informação da tabela para mim.

O problema é que sem isso, eu paro. não consigo dar sequencia ...

entende?

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 31/07/2014 12:23 pm
Basole
(@basole)
Posts: 487
Reputable Member
 

Veja esse ex. eu uso p/ importar dados do meu sql server, se pode te ajudar.
Altere o nome de acordo com seu sql server.

Click em se a resposta foi util!

 
Postado : 01/08/2014 1:03 pm
Página 1 / 2