Exportar para excel com Abas

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
HASA
Colaborador
Colaborador
Mensagens: 1088
Registrado em: 01 Set 2003 19:50
Localização: São Paulo
Contato:

Exportar para excel com Abas

Mensagem por HASA »

:))

Bom dia, pode ser assim

Código: Selecionar todos

oTabs:SaveAs( oCaminho+"\"+arquivo.??? )
Mas... aproveitando se eu salvo com ARQUIVO.XLS o excel a partir de 2010 leem o arquivo e reclamam, se eu salvar sem a extensão não me preocupo com a versão do excel que pode gravar ARQUIVO.XLS ou ARQUIVO.XLSX, o que eu quero e gravar sem a extensão e saber como o excel do cliente gravou XLS ou XLSX, não consigo pegar essa informação ?

HASA
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

Exportar para excel com Abas

Mensagem por asimoes »

E se gravar como a extensão cvs ?
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Paredes01
Usuário Nível 2
Usuário Nível 2
Mensagens: 52
Registrado em: 20 Mai 2012 11:22
Localização: Mérida, Yucatán, México

Exportar para excel com Abas

Mensagem por Paredes01 »

Hola, prueba de está forma:

oSheet:Cells( 10, 10):Formula := '=SUBTOTALES(9,H3:H25)'

Saludos
Ariel
hs_paulo
Usuário Nível 1
Usuário Nível 1
Mensagens: 25
Registrado em: 02 Set 2015 17:11
Localização: Bauru

Exportar para excel com Abas

Mensagem por hs_paulo »

Hasa,


Fiz como voce me falou, e esta dando erro no "No exported method: SAVE AS...." called from TOLEAUTO:SAVEAS(0)

E agora?
Avatar do usuário
HASA
Colaborador
Colaborador
Mensagens: 1088
Registrado em: 01 Set 2003 19:50
Localização: São Paulo
Contato:

Exportar para excel com Abas

Mensagem por HASA »

:))
Amigo você talvez não tenha criado sua planilha com uma variável oTabs veja como declarou o createobj e mude para sua variavel, se não conseguir post um pequeno prg que eu implemento para vc na quarta ou quinta-feira ok
:)Pos
HASA
Avatar do usuário
momente
Usuário Nível 3
Usuário Nível 3
Mensagens: 496
Registrado em: 03 Mar 2005 11:53
Localização: São Carlos-SP
Contato:

Exportar para excel com Abas

Mensagem por momente »

Amigos,

Boa tarde!

Aonde consigo estas funções (propriedades) para trabalhar com planilhas excel? Exemplo: SAVEAS(), Value, AutoFit(), etc

Existe alguma documentação sobre isso?

Desculpe desde já minha ignorância no assunto,

Obrigado!!!
Rogerio L. Momenté
Nada é tão perfeito que não possamos melhorar.
Nunca se explique. Seus amigos não precisam e seus inimigos não vão acreditar.
www.looksystem.com.br
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Exportar para excel com Abas

Mensagem por Toledo »

Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Avatar do usuário
momente
Usuário Nível 3
Usuário Nível 3
Mensagens: 496
Registrado em: 03 Mar 2005 11:53
Localização: São Carlos-SP
Contato:

Exportar para excel com Abas

Mensagem por momente »

Muito Obrigado!!!

Vou dar uma boa estudada neste material.

abraço! :-Y
Rogerio L. Momenté
Nada é tão perfeito que não possamos melhorar.
Nunca se explique. Seus amigos não precisam e seus inimigos não vão acreditar.
www.looksystem.com.br
Avatar do usuário
HASA
Colaborador
Colaborador
Mensagens: 1088
Registrado em: 01 Set 2003 19:50
Localização: São Paulo
Contato:

Exportar para excel com Abas

Mensagem por HASA »

:))
Aqui tem mais um pouquinho: http://teycen.com/minigui/HMG_excel.txt
:)Pos
HASA
Nota de Moderação:
por Toledo: Mensagem editada para anexar o arquivo do link acima, apenas por segurança caso futuramente o link fique quebrado.
HMG_excel.txt
(2.89 KiB) Baixado 634 vezes
pauloa1
Usuário Nível 3
Usuário Nível 3
Mensagens: 227
Registrado em: 25 Jun 2008 14:57
Localização: Augusto Pestana-RS

Exportar para excel com Abas

Mensagem por pauloa1 »

Alguém já conseguiu colocar uma coluna em ordem?
Gerei a macro, mas não consegui aplicar o código.

// Range("A2:P119").Sort Key1:=Range("P4"), Order1:=xlAscending

Paulo
pauloa1
Usuário Nível 3
Usuário Nível 3
Mensagens: 227
Registrado em: 25 Jun 2008 14:57
Localização: Augusto Pestana-RS

LibreOffice

Mensagem por pauloa1 »

Alguém conseguiu gerar as planilhas tanto em excel como em LibreOffice.

Tenho um cliente que mudou para LibreOffice e agora as planilhas não abrem.

Paulo
lugab
Colaborador
Colaborador
Mensagens: 843
Registrado em: 19 Mai 2009 15:58

Exportar para excel com Abas

Mensagem por lugab »

Prezados,

Nessa ótima contribuição do Toledo, tem como deixar o cabeçalho abaixo fixo, não importando em que
página da planilha a visualização se encontra ?

Código: Selecionar todos

oSheet:Cells( 1, 1 ):Value := "Codigo"
oSheet:Cells( 1, 2 ):Value := "Nome"
Uma outra questão: Como devo configurar uma célula para ela receber um campo alfa, com conteúdo
do tipo:
003ACAD
?

É que os 2 primeiros "00" são automaticamente omitidos quando eu jogo na planilha, pq ela os interpreta como zero a esquerda..

Grato,
lugab
Paredes01
Usuário Nível 2
Usuário Nível 2
Mensagens: 52
Registrado em: 20 Mai 2012 11:22
Localização: Mérida, Yucatán, México

Exportar para excel com Abas

Mensagem por Paredes01 »

Hola
Prueba

oSheet:Range("C2"):Value := "SOLO TEXTO EN COLUMNA"
oSheet:Range("D2"):Value := "SOLO NUMERO EN COLUMNA"

oSheet:Range("C:C"):Set("NumberFormat","@") // texto
oSheet:Range("D:D"):Set("NumberFormat","#,##0.00") // número

Saludos
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

Exportar para excel com Abas

Mensagem por Toledo »

lugab escreveu:como deixar o cabeçalho abaixo fixo, não importando em que página da planilha a visualização se encontra ?
Tente o seguinte:

Código: Selecionar todos

oExcel:ActiveWindow:FreezePanes := .t.
lugab escreveu: Como devo configurar uma célula para ela receber um campo alfa, com conteúdo do tipo: 003ACAD
Antes do "00" coloque uma aspas simples, por exemplo:

Código: Selecionar todos

oSheet:Cells( 2, 1 ):Value := "'"+"003ACAD"
Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
Paredes01
Usuário Nível 2
Usuário Nível 2
Mensagens: 52
Registrado em: 20 Mai 2012 11:22
Localização: Mérida, Yucatán, México

Exportar para excel com Abas

Mensagem por Paredes01 »

// Dejamos fijos los titulos
oSheet:Range("C3"):Select()
oExcel:ActiveWindow:FreezePanes = .T.

Saludos
Responder