Nach dem Nachweis der Art und Weise, wie zu lesen Eingang aus Excel-Datei mit Borland C + + Builder, werden wir jetzt zeigen, einen Weg zu schreiben Sie Ihre Ausgabe in Excel-Datei mit der gleichen Sprache, C + +.

Manchmal ist es besser, die Dinge zu erklären, durch Beispiel, so here'sa gute einfaches Beispiel zu zeigen, den Prozess.

Angenommen, du gehst zu schreiben Sie eine Ausgabe in Variable, x, sagen wir x = 3,14 in Zeile 2, Spalte 3 der Excel-Datei. Dann ist alles, was Sie zu tun haben, ist die Verwendung der folgenden Code.

Fall 1: Sie haben zur Schaffung eines neuen Excel-File, dann schreiben Sie es Ausgang

/ / declare variables
Variante XL, v0, v1, v2, v3;
double x = 3,14;

/ / open Excel-Anwendung
XL = Variant:: CreateObject ( "Excel.Application");

/ / setze die Anwendung als unsichtbare, können Sie Reverse "false" auf "true", um es sichtbar
XL.OlePropertySet ( "sichtbar", false);

/ / Get Arbeitsmappe
v0 = XL.OlePropertyGet ( "Workbooks");

/ / add ein Werk Buch
v0.OleProcedure ( "Add");

/ / select Arbeitsmappe Nummer 1
v1 = v0.OlePropertyGet ( "Item", 1);

/ / Get Arbeitsblatt
v2 = v1.OlePropertyGet ( "WorkSheets");

/ / Add ein Blatt Arbeit
v2.OleFunction ( "Add");

/ / select Arbeitsblatt Nummer 1
v3 = v2.OlePropertyGet ( "Item", 1);

/ / umbenennen Arbeitsblatt Sie ihn auf "beispiel1"
v3.OlePropertySet ( "name", "beispiel1");

/ / Endlich, schreiben Sie Ihre Leistung in Zeile 2 Spalte 3
char temp [10];
sprintf (temp, "% lf", x);
v3.OlePropertyGet ( "Zellen"). OlePropertyGet ( "Punkt", 2,3). OlePropertySet ( "Value", temp);

/ / Hier wird länger fragen, wo Sie wollen gleiche Ihre Excel-Datei oder nicht
XL.OlePropertySet ( "DisplayAlerts", false);

/ / speichern Sie Ihre Excel-Datei auf "D" und nennen Sie ihn als "case1.xls"
XL.OlePropertyGet ( "Workbooks"). OlePropertyGet ( "Item", 1). OleProcedure ( "SaveAs", "D: \ \ case1.xls");

/ / Schließen der Arbeit Buch
v1.OleProcedure ( "Close");

/ / ganz im Excel-Anwendung
XL.OleProcedure ( "Quit");

/ / Variable unassign
XL = Unassigned;

Fall 2: Sie wollen, schreiben Sie Ihre Ausgabe in eine vorhandene Excel-Datei mit dem Namen "case1.xls" befindet sich auf der Seite "D:"

double x = 3,14;
/ / declare variables
Variante XL, v0, v1, v2, v3;

/ / open Excel-Anwendung
XL = Variant:: CreateObject ( "Excel.Application");

/ / setze die Anwendung als unsichtbare, können Sie Reverse "false" auf "true", um es sichtbar
XL.OlePropertySet ( "sichtbar", false);

/ / Öffnen der Arbeitsmappe "named case1.xls"
XL.OlePropertyGet ( "Workbooks"). OleProcedure ( "Open", "d: \ \ case1.xls");

/ / Open the Arbeitsblatt "beispiel1"
v0 = XL.OlePropertyGet ( "Platten", "beispiel1");

/ / get einer Zelle
v1 = v0.OlePropertyGet ( "Zellen");

/ / Endlich, schreiben Sie Ihre Leistung in Zeile 2 Spalte 3
char temp [10];
sprintf (temp, "% lf", x);
v1.OlePropertyGet ( "Punkt", 2,3). OlePropertySet ( "Value", temp);

/ / Hier wird länger fragen, wo Sie wollen gleiche Ihre Excel-Datei oder nicht
XL.OlePropertySet ( "DisplayAlerts", false);

/ / speichern, was Sie getan haben
XL.OleProcedure ( "Speichern");

/ / ganz im Excel-Anwendung
XL.OleProcedure ( "Quit");

/ / Variable unassign
XL = Unassigned;

Das war's schon. Obwohl lange, das Verfahren ist noch immer Standard und einfach.