Após a demonstração da forma como sobre o modo de entrada de ler excel arquivo usando o Borland c + + Builder, agora vamos para ilustrar uma forma de escrever sua produção para excel arquivo usando a mesma língua, c + +.

Às vezes é melhor para explicar coisas através de exemplo, aqui está tão bom exemplo simples para demonstrar o processo.

Assumindo que você vai escrever uma saída armazenada na variável, x, digamos x = 3,14 a linha 2, coluna 3 do ficheiro Excel. Então, tudo que você precisa fazer é usar o código a seguir.

CASO 1: Você tem de criar um novo arquivo excel em seguida, escreva a saída lá

/ / declarar variáveis
Variante XL, v0, v1, v2, v3;
double x = 3,14;

/ / abrir o aplicativo Excel
XL = Variante:: CreateObject ( "excel.application");

/ / definir o pedido como invisível, pode inverter a "falsa" a "verdade" para tornar-se visível
XL.OlePropertySet ( "Visível", false);

/ / Get planilha
V0 = XL.OlePropertyGet ( "Workbooks");

/ / adicionar um trabalho livro
v0.OleProcedure ( "Adicionar");

/ / selecionar planilha número 1
v1 = v0.OlePropertyGet ( "ponto", 1);

/ / Get planilha
v2 = v1.OlePropertyGet ( "planilhas");

/ / Acrescentar uma folha de trabalho
v2.OleFunction ( "Adicionar");

/ / selecionar planilha número 1
v3 = v2.OlePropertyGet ( "ponto", 1);

/ / renomeá-la a planilha "example1"
v3.OlePropertySet ( "Nome", "example1");

/ / Finalmente, escrever sua saída em linha 2 coluna 3
char temp [10];
sprintf (temp, "% lf", x);
v3.OlePropertyGet ( "Células"). OlePropertyGet ( "ponto", 2,3). OlePropertySet ( "Valor", temp);

/ / isto irá parar de perguntar-lhe onde você quer mesmo arquivo do Excel ou não
XL.OlePropertySet ( "DisplayAlerts", false);

/ / salvar o seu arquivo em excel "d" e nome-o como "case1.xls"
XL.OlePropertyGet ( "Workbooks"). OlePropertyGet ( "ponto", 1). OleProcedure ( "SaveAs", "d: \ \ case1.xls");

/ / Fechar o trabalho livro
v1.OleProcedure ( "Fechar");

/ / bastante a aplicação excel
XL.OleProcedure ( "Sair");

/ / unassign variável
XL = não atribuído;

CASO 2: Você quer escrever sua saída em um arquivo chamado existentes excel "case1.xls" localizado em "D:"

double x = 3,14;
/ / declarar variáveis
Variante XL, v0, v1, v2, v3;

/ / abrir o aplicativo Excel
XL = Variante:: CreateObject ( "excel.application");

/ / definir o pedido como invisível, pode inverter a "falsa" a "verdade" para tornar-se visível
XL.OlePropertySet ( "Visível", false);

/ / abrir a pasta de trabalho "case1.xls chamado"
XL.OlePropertyGet ( "Workbooks"). OleProcedure ( "Open", "d: \ \ case1.xls");

/ / abrir a planilha "example1"
V0 = XL.OlePropertyGet ( "Folhas", "example1");

/ / obter uma célula
v1 = v0.OlePropertyGet ( "Células");

/ / Finalmente, escrever sua saída em linha 2 coluna 3
char temp [10];
sprintf (temp, "% lf", x);
v1.OlePropertyGet ( "ponto", 2,3). OlePropertySet ( "Valor", temp);

/ / isto irá parar de perguntar-lhe onde você quer mesmo arquivo do Excel ou não
XL.OlePropertySet ( "DisplayAlerts", false);

/ / salvar o que já fez
XL.OleProcedure ( "Salvar");

/ / bastante a aplicação excel
XL.OleProcedure ( "Sair");

/ / unassign variável
XL = não atribuído;

É isso aí. Apesar de longa, o processo ainda está normalizado e simples.