Olá amigos e amigas deste fórum
Eu preciso a ajuda de vocês, para inserir uma linha ou coluna em uma planilha (folha) do Excel que é já criados, isto através de xHb + MiniGui
Muito obrigado a todos e todas vocês por sua atenção, bênçãos para vocês.
Saudações de Santa Cruz de la Sierra - Bolívia
Inserir linhas e colunas no excel con Xhb
Moderador: Moderadores
-
alxsts
- Colaborador

- Mensagens: 3092
- Registrado em: 12 Ago 2008 15:50
- Localização: São Paulo-SP-Brasil
-
Adalberto
- Usuário Nível 3

- Mensagens: 343
- Registrado em: 01 Set 2007 01:09
- Localização: Santa Cruz de la Sierra - Bolivia
Inserir linhas e colunas no excel con Xhb
Hola alxsts,
Muito agradecido por tua pronta ajuda, lei o tópico recomendado e La não tem como inserir linhas a uma folha que já existe, com formato e dados.
O bom exemplo do tópico sugerido só fala de planilhas novas aonde vão gravando dados linha a linha.
Se o senhor sabe de outros exemplos, por favor, me ajude.
Gracias!!!
Muito agradecido por tua pronta ajuda, lei o tópico recomendado e La não tem como inserir linhas a uma folha que já existe, com formato e dados.
O bom exemplo do tópico sugerido só fala de planilhas novas aonde vão gravando dados linha a linha.
Se o senhor sabe de outros exemplos, por favor, me ajude.
Gracias!!!
- Toledo
- Administrador

- Mensagens: 3133
- Registrado em: 22 Jul 2003 18:39
- Localização: Araçatuba - SP
- Contato:
Inserir linhas e colunas no excel con Xhb
Adalberto, veja este exemplo:
Atenção: segue em anexo o arquivo DEMO.XLS para fazer um teste. Crie uma pasta chamada C:\FORUM\EXCEL e salve o arquivo DEMO.XLS nesta pasta... ai é só compilar e executar o exemplo acima.
Se você observar o arquivo DEMO.XLS original vai notar que não existe o lançamento com a data do dia 02/06/2011, mas quando você executar o código acima, os dados serão inseridos na linha 5 da planilha.
Abraços,
Código: Selecionar todos
FUNCTION MAIN()
LOCAL oExcel, oSheet
oExcel := TOleAuto():New( "Excel.Application" )
oExcel:WorkBooks:Open("c:\forum\excel\demo.xls")
oSheet := oExcel:Get( "ActiveSheet" )
oSheet:Cells(5,1):EntireRow:Insert()
oSheet:Cells( 5, 1 ):Value := "02/06/2011"
oSheet:Cells( 5, 2 ):Value := 1300
oExcel:Visible := .T.
Return NilSe você observar o arquivo DEMO.XLS original vai notar que não existe o lançamento com a data do dia 02/06/2011, mas quando você executar o código acima, os dados serão inseridos na linha 5 da planilha.
Abraços,
- Anexos
-
demo.xls- Planilha Excel de exemplo
- (13.5 KiB) Baixado 207 vezes
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
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
-
Adalberto
- Usuário Nível 3

- Mensagens: 343
- Registrado em: 01 Set 2007 01:09
- Localização: Santa Cruz de la Sierra - Bolivia
Inserir linhas e colunas no excel con Xhb
Bom dia Toledo,
Tenho muito para agradecer ao Senhor, por o fórum maravilhoso, aqui também agradeço aos Srs. moderadores, e por as ajudas oportunas, Deus abençoe você.
Testei o exemplo e deu certinho, nesse instante vou implantar nos meus códigos.
¿Posso molestar um pouquinho mais, me disse, por favor, onde conseguir informação acerca de todos os comandos para trabalhar com o Excel?
Aguardo suas noticias.
Tenho muito para agradecer ao Senhor, por o fórum maravilhoso, aqui também agradeço aos Srs. moderadores, e por as ajudas oportunas, Deus abençoe você.
Testei o exemplo e deu certinho, nesse instante vou implantar nos meus códigos.
¿Posso molestar um pouquinho mais, me disse, por favor, onde conseguir informação acerca de todos os comandos para trabalhar com o Excel?
Aguardo suas noticias.
-
alxsts
- Colaborador

- Mensagens: 3092
- Registrado em: 12 Ago 2008 15:50
- Localização: São Paulo-SP-Brasil
Inserir linhas e colunas no excel con Xhb
Olá!
Tem uma resposta do Toledo no tópico que citei: Exportar para Excel com Abas.
Tem uma resposta do Toledo no tópico que citei: Exportar para Excel com Abas.
Olá gvc, eu não tenho nenhuma documentação, mas aqui quando preciso de algo novo eu to fazendo o seguinte:
1 - Entro no Excel e abro um arquivo novo.
2 - Depois escolho as opções: Ferramentas / Macro / Gravar nova macro
3 - No nome da macro eu sempre coloco TESTE (pois depois eu acabo nunca salvando a macro e nem o arquivo XLS) e clico no botão Ok.
4 - Depois tudo o que eu fizer no excel, será gravado nesta macro.
5 - Quando eu terminar, mando parar a gravação da macro.
6 - Ai é só entrar em: Ferramentas / Macro / Macros... (Alt+F8), selecione a macro que você gravou (TESTE no caso) e clico no botão Editar.
Ai vai aparecer o código de tudo que você fez durante a gravação da macro.
[]´s
Alexandre Santos (AlxSts)
Alexandre Santos (AlxSts)
-
Adalberto
- Usuário Nível 3

- Mensagens: 343
- Registrado em: 01 Set 2007 01:09
- Localização: Santa Cruz de la Sierra - Bolivia
Inserir linhas e colunas no excel con Xhb
Alexandre Santos
Ontem já muito tarde pela noite lei o post, o sonho e cansado como estava, não percebi a lição compartida.
Muito obrigado uma vez mais, prometo ser cuidadoso com as recomendações.
Gracias!!
Ontem já muito tarde pela noite lei o post, o sonho e cansado como estava, não percebi a lição compartida.
Muito obrigado uma vez mais, prometo ser cuidadoso com as recomendações.
Gracias!!