Discussion :

[Jidewe]

Je m'essaye à la modification de fichier xls depuis C++ Builder et j'ai donc suivis le tuto du site

Mais je dois oublier quelque chose car j'obtiens a chaque execution une fenetre Windows qui m'annonce qu'excel a rencontrer un probleme et doit fermer.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
void main()
{
        int i;
 
        CoInitialize(0); // sans cela j'obtiens une erreur
 
        Variant vMSExcel;
 
        vMSExcel = Variant::CreateObject("Excel.Application");
 
        vMSExcel.OlePropertySet("Visible", false);
 
        Variant vFileName, vXLWorkbooks, vXLWorkbook, vWorksheet, vSheetName, vValue, vRange, vCell,vSaveChanges;
 
        vFileName = "C:\\test.xls";
        vXLWorkbooks = vMSExcel.OlePropertyGet("Workbooks");
        vXLWorkbook = vXLWorkbooks.OleFunction("Open", vFileName);
 
        vSheetName = "Feuil1";
        vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets",vSheetName);
        cin>>txt;
 
        AnsiString aValue;
 
        vRange = "A1";
        vCell = vWorksheet.OlePropertyGet("Range", vRange);
        aValue = vCell.OlePropertyGet("Value");
 
        cout<<aValue;
 
 
 
        cin>>i;
}

Je suis sur une application console.

[blondelle]

Salut Jidewe:
Je pense que ton erreur est la

vSheetName = "Feuil1";
vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets",vSheetName);

Tu met juste

vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets",1);

Tu ne donne un nom que si c'est different de "Feuil1"...

[Jidewe]

non c'est pas ça

Pourrais tu me donner un en-tête standard stp? Avec des includes necessaires, peut etre que j'en oublie certains...

[blondelle]

Un lien sur un Tuto.

http://lfe.developpez.com/Excel/

[Jidewe]

Oui oui déja lu ^^ Si tu regarde bien mon code c'est exactement le tuto Mais je n'arrive pas a le faire fonctionner!

[blondelle]

Je fais la meme chose que toi.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Variant vMSExcel, vXLWorkbooks, vXLWorkbook, vWorksheet;
Variant vWorksheets;
vMSExcel = Variant::CreateObject("Excel.Application");
vMSExcel.OlePropertySet("Visible", true);
Variant vFileName, vNotUsed;
vNotUsed = Unassigned;
vFileName = "C:\\test_Word";
vXLWorkbooks = vMSExcel.OlePropertyGet("Workbooks");
vXLWorkbook = vXLWorkbooks.OleFunction("Open", vFileName, vNotUsed,
vNotUsed, vNotUsed);
vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets", 1);

Il y a aussi la FAQ

[blondelle]

Ton code fonctionne chez moi, mais j'utilise les composants, j'ai donc mis en commentaires ce qui ne fonctionne pas avec les composants.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
// ne pas oublier #include <utilcls.h>
        int i;
        OleInitialize(0); // sans cela j'obtiens une erreur
        Variant vMSExcel;
        vMSExcel = Variant::CreateObject("Excel.Application");
        vMSExcel.OlePropertySet("Visible", true);
        Variant vFileName, vXLWorkbooks, vXLWorkbook, vWorksheet, vSheetName, vValue, vRange, vCell,vSaveChanges;
        vFileName = "C:\\test.xls";
        vXLWorkbooks = vMSExcel.OlePropertyGet("Workbooks");
        vXLWorkbook = vXLWorkbooks.OleFunction("Open", vFileName);
//        vSheetName = "Feuil1";
        vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets",1);
//        cin>>txt;
//        AnsiString aValue;
  Variant aValue;
        vRange = "A1";
        vCell = vWorksheet.OlePropertyGet("Range", vRange);
        aValue = vCell.OlePropertyGet("Value");
//        cout<<aValue;
 
//        cin>>i;