Clique abaixo para nos ajudar
Conectar-se

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
10 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 10 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Espessura do cursor intermitente

7/3/2017, 09:08 por Jefferson Matakas

Bom dia a todos !!

Existe uma opcao no windows que pode ser acessada atraves da 'central da …

Comentários: 0

DESENVOLVIMENTO EM REDES

4/3/2017, 18:45 por AJC

Pessoal tem ou conhece livros ou material para programação em
redes usando banco de dados nativo …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 4

Como preencher campos vazios

9/2/2017, 11:55 por Linghston

Pessoal boa tarde,

É o seguinte, eu preciso preencher os campos de uma coluna da tabela DBF que …

Comentários: 2

Enviar msg para WhatsAPP via VFP

7/2/2017, 10:31 por Eliana

Olá Pessoal!

Alguém sabe se é possível enviar mensagem para o WhatsAPP via VFP?


Grata


Comentários: 0

Estatísticas
Temos 7037 usuários registrados
O último usuário registrado atende pelo nome de GETULIO

Os nossos membros postaram um total de 31 mensagens em 17 assuntos

Exportação de Campo Memo para Excel

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido Exportação de Campo Memo para Excel

Mensagem por Nelson Arcas em 2/12/2009, 13:44

Pessoal, boa tarde

Tenho um processo que forma uma tabela com diversas informações de clientes inclusive algumas com observações sobre a execução do serviço.

Foi solicitado que as informações ao inves de gerar um relatorio fosse exportada as informações para o excel.

Utilizei o comando
copy to c:\infocli.xls type xl5

Todos os campos foram exportados menos o que contem observações que são campos tipo Memo.

Alguem ja passou por esta situação e conseguiu resolver?
Ou exite outra forma de fazer isso.
avatar
Nelson Arcas
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Nelson Arcas em 2/12/2009, 16:11

Pessoal, boa tarde
Consegui resolver não sei se foi a melhor maneira e correta mais atendeu o que estava precisando.

Segue o exemplo abaixo.

*** Seleção dos dados necessarios ***
SELECT codcli AS codigo,;
nomecli AS cliente,;
obs;
FROM cadcli;
WHERE filial=6;
INTO CURSOR auxcli

GO TOP

** Variavel indicadora onde deve ser gerado o valor ***
m.contador=1

WAIT WINDOW 'Abrindo o Excel' NOWAIT

tmpsheet = GETOBJECT('','excel.sheet')

xlapp = tmpsheet.APPLICATION

xlapp.VISIBLE = .T.
xlapp.workbooks.ADD()
xlsheet = xlapp.activesheet

xlsheet.cells(1,1).VALUE = "Codigo"
xlsheet.cells(1,2).VALUE = "Cliente"
xlsheet.cells(1,3).VALUE = "OBS"

SCAN

xlsheet.cells(M.contador+1,1).VALUE=auxcli.codigo
xlsheet.cells(M.contador+1,2).VALUE=auxcli.cliente
xlsheet.cells(M.contador+1,3).VALUE=auxcli.obs

m.contador=M.contador+1

ENDSCAN

Very Happy
avatar
Nelson Arcas
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Marcos Guedes em 2/12/2009, 16:25

Ótima sua iniciativa de informar a solução encontrada para o seu problema, Nelson!


Caso seja do seu interesse, dê uma olhada nestes tópicos:
- [Você precisa estar registrado e conectado para ver este link.]
- [Você precisa estar registrado e conectado para ver este link.]

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Tales Ruan em 3/12/2009, 08:58

Nelson, na sua primeira solução, acho que tinha um "jeitinho" bem simples de resolver, convertendo o campo memo para uma string antes de executar o comando
copy to c:\infocli.xls type xl5

Pra converter o campo memo você poderia usar o comando Substr(CampoMemo,1,nQuantosCaracteresVoceQuer)

Poderia ficar assim, no final:

SELECT codcli AS codigo,;
nomecli AS cliente,;
Substr(obs,1,120); <- Só vai pegar 120 caracteres do campo OBS
FROM cadcli;
WHERE filial=6;
INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Acho que também funciona.. é uma opção.
avatar
Tales Ruan
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Linghston em 1/4/2011, 10:50

[Você precisa estar registrado e conectado para ver este link.] escreveu:Nelson, na sua primeira solução, acho que tinha um "jeitinho" bem simples de resolver, convertendo o campo memo para uma string antes de executar o comando
copy to c:\infocli.xls type xl5

Pra converter o campo memo você poderia usar o comando Substr(CampoMemo,1,nQuantosCaracteresVoceQuer)

Poderia ficar assim, no final:

SELECT codcli AS codigo,;
nomecli AS cliente,;
Substr(obs,1,120); <- Só vai pegar 120 caracteres do campo OBS
FROM cadcli;
WHERE filial=6;
INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Acho que também funciona.. é uma opção.

Tales Ruan,

Esta sua sugestão não esta funcionado no VFP9, não esta trazendo nada do campo MEMO.
Nem a do nosso amigo Nelson Arcas.
Voce saberia me dizer porque?
Estou precisando exportar 16500 registro do campo MEMO para uma planilha Ecxel para analise da gerencia.

Aguardo, Obrigado.

Linghston
avatar
Linghston
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Tales Ruan em 1/4/2011, 19:57

Olá.

Estou longe do VFP agora, mas acredito ser um problema de sintaxe.

Tente executar o comando assim:

Código:
SELECT codcli AS codigo, nomecli AS cliente, Substr(obs,1,120) as OBS FROM cadcli WHERE filial=6 INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Se isto não resolver, me avise qual a mensagem de erro e qual dos comandos não funcionou.
avatar
Tales Ruan
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Linghston em 2/4/2011, 07:50

[Você precisa estar registrado e conectado para ver este link.] escreveu:Olá.

Estou longe do VFP agora, mas acredito ser um problema de sintaxe.

Tente executar o comando assim:

Código:
SELECT codcli AS codigo, nomecli AS cliente, Substr(obs,1,120) as OBS FROM cadcli WHERE filial=6 INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Se isto não resolver, me avise qual a mensagem de erro e qual dos comandos não funcionou.

Bom dia,
Teste sua sugestão mas não funcionou, ele carrega na planilha todos os campo, menos o campo MEMO, este campo não vem nada na planilha excel e não da mensagem de erro algum.
avatar
Linghston
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Linghston em 2/4/2011, 09:07

[Você precisa estar registrado e conectado para ver este link.] escreveu:
[Você precisa estar registrado e conectado para ver este link.] escreveu:Olá.

Estou longe do VFP agora, mas acredito ser um problema de sintaxe.

Tente executar o comando assim:

Código:
SELECT codcli AS codigo, nomecli AS cliente, Substr(obs,1,120) as OBS FROM cadcli WHERE filial=6 INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Se isto não resolver, me avise qual a mensagem de erro e qual dos comandos não funcionou.

Bom dia,
Teste sua sugestão mas não funcionou, esta aparecendo a seguinte mensagem: "IMPOSSIVEL TER ACESSO A CARACTRES ALEM DA SEQUENCIA." Este erro ocoreu na linha do select.
avatar
Linghston
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Tales Ruan em 4/4/2011, 07:56

Opa..

Bobeei. Estava errado mesmo.

Agora deve funcionar. Fiz o teste também.

Código:
SELECT codcli as codigo, nomecli as cliente, CAST(STRTRAN(obs,CHR(13)+CHR(10),"  ") as c(NTAMANHO)) as obs FROM cadcli WHERE filial=6 INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Considerei que o campo memo é o OBS. Para o código funcionar você deve trocar NTAMANHO pelo tamanho máximo em caracteres que quer que o campo OBS possua no excel (ex: 150).

Espero ter ajudado.
avatar
Tales Ruan
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Exportação de Campo Memo para Excel

Mensagem por Linghston em 4/4/2011, 14:55

[Você precisa estar registrado e conectado para ver este link.] escreveu:Opa..

Bobeei. Estava errado mesmo.

Agora deve funcionar. Fiz o teste também.

Código:
SELECT codcli as codigo, nomecli as cliente, CAST(STRTRAN(obs,CHR(13)+CHR(10),"  ") as c(NTAMANHO)) as obs FROM cadcli WHERE filial=6 INTO CURSOR auxcli

copy to c:\infocli.xls type xl5

Considerei que o campo memo é o OBS. Para o código funcionar você deve trocar NTAMANHO pelo tamanho máximo em caracteres que quer que o campo OBS possua no excel (ex: 150).

Espero ter ajudado.

Muito obrigado amigo, resolveu meu problema...
avatar
Linghston
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum