[MFC/Excel] Créer un nouveau tableau et le remplir

Version imprimable

13/05/2008, 16h44
SmOkEiSBaD

[MFC/Excel] Créer un nouveau tableau et le remplir
Bonjour à tous,
Je voudrais comment ouvrir et remplir un tableau Excel.
J'arrive à ouvrir l'application Excel :
Code:

1 2 CApplication spAppli; spAppli.CreateDispatch(_T("Excel.Application"));
Mais je n'arrive pas à trouver de fonction du genre Add... ou New... ou Create..

Je recupère une collection de Worksheet et une collection de Workbook. Est-ce utile ?

Merci de votre aide.

ReBonjour,
Apparement grâce à l'application, on récupère une collection de Workbooks, dans cette collection, on récupère le Workbook courant, puis à partir du Workbook, on récupère une collection de Worksheet, puis on récupère le Worksheet courant et enfin on peut créer et remplir un tableau.
Seulement mon code ne compile pas...
Voici mon code :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 CApplication spAppli; //Smart Pointer vers l'application Excel CWorkbooks spWorkbooks; CWorkbook spWorkbook; CWorksheets spWorksheets; CWorksheet spWorksheet; VARIANT vIndex; vIndex.vt = VT_INT; vIndex.intVal = 1; //Ouverture de l'application Excel spAppli.CreateDispatch(_T("Excel.Application")); AfxMessageBox(_T("Application Excel ouverte")); //On récupère le Workbook courant dans la collection de Workbook de l'application spWorkbooks = spAppli.get_Workbooks(); spWorkbook = spWorkbooks.get_Item(vIndex); AfxMessageBox(_T("On a le Workbook")); //On récupère le worksheet courant dans la collection de worksheets du workbook spWorksheets = spWorkbook.get_Worksheets(); spWorksheet = spWorksheets.get_Item(vIndex); AfxMessageBox(_T("On a le Worksheet"));

Alors j'ai trouvé ceci :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
CApplication spAppli; //Smart Pointer vers l'application Excel
	CWorkbook ActiveWorkbook;
	CWorksheet ActiveWorksheet;
 
	VARIANT vIndex;
	vIndex.vt = VT_INT;
	vIndex.intVal = 1;
 
	//Ouverture de l'application Excel
	spAppli.CreateDispatch(_T("Excel.Application"));
	AfxMessageBox(_T("Application Excel ouverte"));
 
	//On récupère le Workbook courant dans la collection de Workbook de l'application
	ActiveWorkbook = spAppli.get_ActiveWorkbook();
	AfxMessageBox(_T("On a le Workbook"));
 
 
	//On récupère le worksheet courant dans la collection de worksheets du workbook
	ActiveWorksheet = spAppli.get_ActiveSheet();
	AfxMessageBox(_T("On a le Worksheet"));

Apparement cela fonctionne..
Du coup est-il nécessaire de récupérer le Workbook courant ? (Si on ne rajoute pas de feuille supplémentatire ?)

J'ai quelque peu avancé voici ou j'en suit :

Code:

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
CApplication spAppli;        
	CWorkbooks spWorkbooks;		 
	CWorksheet ActiveWorksheet;  
	CRange spRange;              
 
	VARIANT vAdd, vRange;
	vAdd.vt = VT_INT;
	vAdd.intVal = 1;
	vRange.vt = VT_BSTR; 
 
	//Ouverture de l'application Excel
	spAppli.CreateDispatch(_T("Excel.Application"));
	spAppli.put_Visible(TRUE);
	AfxMessageBox(_T("Application Excel ouverte"));
 
	//On récupère la collection de classeur de l'appli en cours et on en ajoute un nouveau
	spWorkbooks = spAppli.get_Workbooks();
	spWorkbooks.Add(vAdd);
 
	//On récupère la feuille de calcul active
	ActiveWorksheet = spAppli.get_ActiveSheet();
 
	//On récupère les cellules que l'on veut modifier
	ActiveWorksheet.get_Range(vRange);
 
 
	spAppli.Quit();

Mon problème est que je ne peux convertir un const char * en BSTR donc je ne peux pas passer d'argument à la fonction get_Range..
Merci.

Voila la solution que j'ai trouvée :

Code:

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
CApplication spAppli;        //Smart Pointer vers l'application Excel
	CWorkbooks spWorkbooks;		 //Collection de classeur
	CWorksheet ActiveWorksheet;  //Feuille de calcul Active
	CRange spRange;              //Bloc de cellule
	CString sCell;
 
	COleVariant vMissing(DISP_E_PARAMNOTFOUND, VT_ERROR); //Evite les paramètres optionnels des fonctions
 
	VARIANT vAdd, vCell1, vCell2;
	vAdd.vt = VT_INT;
	vAdd.intVal = 1;
	vCell1.vt = VT_BSTR;
	sCell = CString("A1");
	vCell1.bstrVal = sCell.AllocSysString();
 
 
 
	//Ouverture de l'application Excel
	spAppli.CreateDispatch(_T("Excel.Application"));
	spAppli.put_Visible(TRUE);
	AfxMessageBox(_T("Application Excel ouverte"));
 
	//On récupère la collection de classeur de l'appli en cours et on en ajoute un nouveau
	spWorkbooks = spAppli.get_Workbooks();
	spWorkbooks.Add(vAdd);
 
	//On récupère la feuille de calcul active
	ActiveWorksheet = spAppli.get_ActiveSheet();
 
	//On récupère les cellules que l'on veut modifier
	spRange = ActiveWorksheet.get_Range(vCell1, vMissing);
	spRange.put_Value(vMissing, vAdd);

Premier Topic que je résoud tout seul o_O