Fórum Delphi Excel (OLE) #264812
11/01/2005
0
Pessoal,
Consegui fazer a exportação de alguns dados do meu aplicativo para o Excel. Bom... Tive que utilizar OLE para fazer esta exportação, pois precisava formatar algumas células... O problema é que eu não estou conseguindo atribuir uma fórmula a uma célula no Excel...
Alguém tem alguma dica?
Segue um trecho do código que utilizei:
Já tentei atribui o valor diretamente para a célula, mas não funcionou...
Consegui fazer a exportação de alguns dados do meu aplicativo para o Excel. Bom... Tive que utilizar OLE para fazer esta exportação, pois precisava formatar algumas células... O problema é que eu não estou conseguindo atribuir uma fórmula a uma célula no Excel...
Alguém tem alguma dica?
Segue um trecho do código que utilizei:
Excel := CreateOleObject(´Excel.Application´); Excel.WorkBooks.Open(NomeArquivo); Excel.Visible := false; ... FWorkSheet.Range[Celula1, Celula2].Value2 := Valor;
Já tentei atribui o valor diretamente para a célula, mas não funcionou...
Michaell
Curtir tópico
+ 0
Responder
Posts
11/01/2005
Lucas Silva
Grave macros no excel e depois vai em editor de Visual Basic.
E olhe o código destas macros...
Depois é só colocar um [b:5bb1f5580d]excel.[/b:5bb1f5580d] antes dos comandos no delphi, que funciona blz....
Qualquer dúvida, posta ai..
T+,
Lucas!
E olhe o código destas macros...
Depois é só colocar um [b:5bb1f5580d]excel.[/b:5bb1f5580d] antes dos comandos no delphi, que funciona blz....
Qualquer dúvida, posta ai..
T+,
Lucas!
Responder
Gostei + 0
11/01/2005
Michaell
[quote:9880a1ae85=´Lucas Alves Silva´]Grave macros no excel e depois vai em editor de Visual Basic.
E olhe o código destas macros...
Depois é só colocar um [b:9880a1ae85]excel.[/b:9880a1ae85] antes dos comandos no delphi, que funciona blz....
Qualquer dúvida, posta ai..
T+,
Lucas![/quote:9880a1ae85]
Eu fiz assim:
vContaLinha é uma variável integer que eu declarei, e que é incrementada por um laço for... ROUNDUP é a fórmula de AREDONDAR.PARA.CIMA...
Quando ele gear a planilha a célula K14 fica assim:
=ARREDONDAR.PARA.CIMA(´I14´/´J14´;0)
Estas aspas em I14 e J14 são um erro...
Como eu faço??
E olhe o código destas macros...
Depois é só colocar um [b:9880a1ae85]excel.[/b:9880a1ae85] antes dos comandos no delphi, que funciona blz....
Qualquer dúvida, posta ai..
T+,
Lucas![/quote:9880a1ae85]
Eu fiz assim:
FWorkSheet.Range[K14, K14].FormulaR1C1 :=
´ROUNDUP(I´+ IntToStr(vContaLinha) + ´/J´ + IntToStr(vContaLinha) + ´,0)´;
vContaLinha é uma variável integer que eu declarei, e que é incrementada por um laço for... ROUNDUP é a fórmula de AREDONDAR.PARA.CIMA...
Quando ele gear a planilha a célula K14 fica assim:
=ARREDONDAR.PARA.CIMA(´I14´/´J14´;0)
Estas aspas em I14 e J14 são um erro...
Como eu faço??
Responder
Gostei + 0
11/01/2005
Lucas Silva
Estas aspas no numero é pq em algum lugar ai tem uma linha assim
Tira essa linha ai....
excel.numerformat := ´@´;
Tira essa linha ai....
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)