Página 3 de 5

Exportar para excel com Abas

Enviado: 05 Fev 2016 12:03
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

Exportar para excel com Abas

Enviado: 05 Fev 2016 12:54
por asimoes
E se gravar como a extensão cvs ?

Exportar para excel com Abas

Enviado: 05 Fev 2016 15:08
por Paredes01
Hola, prueba de está forma:

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

Saludos
Ariel

Exportar para excel com Abas

Enviado: 05 Fev 2016 18:02
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?

Exportar para excel com Abas

Enviado: 07 Fev 2016 18:54
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

Exportar para excel com Abas

Enviado: 07 Abr 2016 15:44
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!!!

Exportar para excel com Abas

Enviado: 07 Abr 2016 19:19
por Toledo

Exportar para excel com Abas

Enviado: 08 Abr 2016 15:21
por momente
Muito Obrigado!!!

Vou dar uma boa estudada neste material.

abraço! :-Y

Exportar para excel com Abas

Enviado: 08 Abr 2016 15:46
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

Exportar para excel com Abas

Enviado: 01 Ago 2016 19:32
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

LibreOffice

Enviado: 06 Mar 2017 11:11
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

Exportar para excel com Abas

Enviado: 27 Mar 2017 18:37
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,

Exportar para excel com Abas

Enviado: 27 Mar 2017 21:14
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

Exportar para excel com Abas

Enviado: 27 Mar 2017 21:51
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,

Exportar para excel com Abas

Enviado: 28 Mar 2017 10:36
por Paredes01
// Dejamos fijos los titulos
oSheet:Range("C3"):Select()
oExcel:ActiveWindow:FreezePanes = .T.

Saludos