Discussion :

[jerome71300]

Bonjour,
Je cherche à ouvrir un fichier Excel existant sans utiliser les outils .Net.
Le fichier ne veut pas s'ouvrir il retourne l'exception.

Si je fais ceci ça me créé bien un fichier Excel et ça me remplit la cellule :

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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
#include <iostream>
 
#import "F:\Program Files\Fichiers communs\Microsoft Shared\Office10\MSO.DLL" no_namespace rename("DocumentProperties","DocumentPropertiesXL")
#import "F:\Program Files\Fichiers communs\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB" no_namespace
#import "F:\Program Files\Microsoft Office\Office10\Excel.exe" rename("ExitWindows", "ExitWindowsWD") rename("DialogBox", "ExcelDialogBox") rename("RGB", "ExcelRGB") no_dual_interfaces
 
using namespace std;
 
int main()
{
	// Initialize COM
	CoInitialize(NULL);
	try
	{
		Excel::_ApplicationPtr excel;
 
		HRESULT hr = excel.CreateInstance(L"Excel.Application");
		if(FAILED(hr))
		{
		char msg[1024] = {0};
		sprintf(msg, "E: There was an error initializing Excel: %d", hr);
		printf(msg);
		}
		excel->PutVisible (true);
 
		//ajoute un workbook		
		Excel::_WorkbookPtr workbook = excel->Workbooks->Open("F:\Documents and Settings\Jérôme\Mes documents\Visual Studio 2008\Projects\PROGRAMME_MAC_BU\PROGRAMME_MAC_BU\Debug\PROGBU.xls"); // Create the workbook
 
		//prendre le nom de la feuille active
		Excel::_WorksheetPtr worksheet = excel->ActiveSheet; // Get the active sheet
 
		//nommer la feuille
		//worksheet->PutName ("Nom de la feuille");
 
		// on remplit une cellule
		//worksheet->Range["A1"]->Value = "Hello";
 
		//worksheet->SaveAs("c:\\test.xls");
		//workbook->Close(); // Close the workbook
		//excel->Quit(); // Quit excel
	}
 
	catch(_com_error &ce)
	{
		 MessageBox (NULL, "Erreur !!!", "Error", 0x10010);
	}
 
	CoUninitialize();
}

Pourquoi cela ne marche pas ?
Merci de m'aider.

[Médinoc]

J'ai du mal à comprendre ton post.
Peux-tu préciser exactement ce qui marche ou pas ?

[jerome71300]

En fait le fichier Excel n'est pas ouvert et donc l'exception est retournée (ouverture de la MessageBox).

Je mets le message du debugger :

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
'testExcel.exe' : Chargé 'F:\Documents and Settings\Jérôme\Mes documents\Visual Studio 2008\Projects\testExcel\Debug\testExcel.exe', Les symboles ont été chargés.
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\ntdll.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\kernel32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\user32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\gdi32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\ole32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\advapi32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\rpcrt4.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\secur32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\msvcrt.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\oleaut32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\WinSxS\x86_Microsoft.VC90.DebugCRT_1fc8b3b9a1e18e3b_9.0.21022.8_x-ww_597c3456\msvcr90d.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\imm32.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\MSCTF.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\SynTPFcs.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\version.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\clbcatq.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\comres.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\msi.dll'
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\xpsp2res.dll', Le fichier binaire n'a pas été généré avec les informations de débogage.
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\sxs.dll'
Exception de première chance à 0x7c812a5b dans testExcel.exe : Exception Microsoft C++ : _com_error à l'emplacement mémoire 0x0012f824..
'testExcel.exe' : Chargé 'F:\WINDOWS\system32\MSCTFIME.IME'
Le thread 'Thread de rappel RPC' (0x6f4) s'est arrêté avec le code 0 (0x0).
Le thread 'Thread de rappel RPC' (0xd44) s'est arrêté avec le code 0 (0x0).
Le thread 'Thread Win32' (0xddc) s'est arrêté avec le code 0 (0x0).
Le programme '[540] testExcel.exe: Natif' s'est arrêté avec le code 0 (0x0).

[Médinoc]

As-tu débogué pas à pas ?
À quel moment a lieu l'erreur exactement ? Dans le Open() ?
Quel est le contenu de l'exception ? (HRESULT ? Message ?)

[jerome71300]

L'erreur est effectivement dans l'ouverture.
Si je commente la ligne du Open() l'exception n'est pas retournée.
Le message est celui de l'exception ("Erreur !!!").

[Médinoc]

Le message est celui de l'exception ("Erreur !!!").

Je pensais avoir été assez clair dans mon précédent post:
La classe _com_error contient tout plein d'infos sur l'erreur, comme son HRESULT et une interface IErrorInfo...

[jerome71300]

Up !

[stephdim]

tu regardes dans la doc de Qt comment tu peux extraire un const char * ou un const wchar_t * depuis ton QString et le tour est joué. autrement dit, recuperer un pointeur sur une chaine de type C (avec un '\0' pour finir la chaine)
de préférence un const wchar_t *, ça évite des conversions ...

@+

[jerome71300]

Après un passage par la rubrique "Qt" :
Il me manquait la ligne pour la conversion :

Code :

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

1
2
std::wstring ws = tableau->item(1, 1)->text().toStdWString();
const wchar_t *bb = ws.c_str(); //je parle de celle-ci

Merci à tout le monde.

[Pacalm]

On peut aussi inserer du texte en masse comme ça :

Excel::RangePtr pRange = worksheet->GetRange( _bstr_t( _T("A1") ), _bstr_t( _T("Z255" ) ) );
pRange->Cells->PutValue2(_bstr_t( _T("TEST") ));