Après la démonstration sur la façon dont la manière de lire la contribution de fichier Excel avec Borland C + + Builder, nous allons maintenant illustrer une façon d'écrire votre sortie de fichier Excel en utilisant la même langue, c + +.

Parfois, il vaut mieux expliquer les choses par exemple, voici un bon exemple simple pour démontrer le processus.

En supposant que vous allez écrire une sortie stockés dans la variable, x, x = dire 3,14 à la ligne 2, colonne 3 du fichier Excel. Ensuite, tout ce que vous avez à faire est d'utiliser le code ci-dessous.

CAS 1: Vous devez créer un nouveau fichier Excel puis rédigez votre sortie, il

/ / déclarer les variables
Variante XL, v0, v1, v2, v3;
double x = 3,14;

/ / ouvre l'application Excel
XL = Variante:: CreateObject ( "excel.application");

/ / configurer l'application comme invisible, vous pouvez inverser les "faux" sur "true" pour la rendre visible
XL.OlePropertySet ( "Visible", false);

/ / Get manuel
v0 = XL.OlePropertyGet ( "Cahiers");

/ / ajouter un carnet de travail
v0.OleProcedure ( "Ajouter");

/ / select cahier numéro 1
v1 = v0.OlePropertyGet ( "Point", 1);

/ / Get feuille de travail
v2 = v1.OlePropertyGet ( "feuilles de travail»);

/ / Ajouter une fiche de travail
v2.OleFunction ( "Ajouter");

/ / select feuille de travail n ° 1
v3 = v2.OlePropertyGet ( "Point", 1);

/ / feuille de renommer en "exemple1"
v3.OlePropertySet ( "Nom", "exemple1");

/ / Enfin, rédigez votre sortie à la ligne 2 colonne 3
char temp [10];
sprintf (temp, "% lf", x);
v3.OlePropertyGet ( "cellules"). OlePropertyGet ( "Point", 2,3). OlePropertySet ( "Valeur", temp);

/ / ceci s'arrête pour vous demander où vous voulez même votre fichier Excel ou pas
XL.OlePropertySet ( "DisplayAlerts", false);

/ / enregistrer votre fichier Excel à "d" et le nom de "case1.xls"
XL.OlePropertyGet ( "Cahiers"). OlePropertyGet ( "Point", 1). OleProcedure ( "SaveAs", "d: \ \ case1.xls");

/ / Fermer le carnet de travail
v1.OleProcedure ( "Fermer");

/ / tout à fait la demande excel
XL.OleProcedure ( "Quitter");

/ / Supprimer variable
XL = Unassigned;

CAS 2: Vous voulez écrire votre sortie dans un fichier Excel nommé "case1.xls" situé à "D:"

double x = 3,14;
/ / déclarer les variables
Variante XL, v0, v1, v2, v3;

/ / ouvre l'application Excel
XL = Variante:: CreateObject ( "excel.application");

/ / configurer l'application comme invisible, vous pouvez inverser les "faux" sur "true" pour la rendre visible
XL.OlePropertySet ( "Visible", false);

/ / ouvrir le cahier de travail »nommé case1.xls"
XL.OlePropertyGet ( "Cahiers"). OleProcedure ( "Ouvrir", "d: \ \ case1.xls");

/ / ouvrir la feuille de travail "exemple1"
v0 = XL.OlePropertyGet ( "Feuilles", "exemple1");

/ / récupère une cellule
v1 = v0.OlePropertyGet ( "Cells");

/ / Enfin, rédigez votre sortie à la ligne 2 colonne 3
char temp [10];
sprintf (temp, "% lf", x);
v1.OlePropertyGet ( "Point", 2,3). OlePropertySet ( "Valeur", temp);

/ / ceci s'arrête pour vous demander où vous voulez même votre fichier Excel ou pas
XL.OlePropertySet ( "DisplayAlerts", false);

/ / mettre ce que vous avez fait
XL.OleProcedure ( "Enregistrer");

/ / tout à fait la demande excel
XL.OleProcedure ( "Quitter");

/ / Supprimer variable
XL = Unassigned;

That's it. Bien que longue, la procédure est toujours la norme et simple.