2 pièce(s) jointe(s)
TExcelApplication et le volet de visualisation de Windows
Bonjour.
J'ai un programme qui se connecte à un fichier Excel ouvert via TExcelApplication et qui crée une worksheet.
Quand j'ai le volet de visualisation de windows d'activé, que "prévisualise" mon classeur, puis que j'ouvre le classeur , le programme me retourne l'erreur suivante : 'Erreur OLE 800A03EC'
Dans les process, j'ai 2 instances d'excel, dont une qui à comme argument : "Embedding"
Je penses que Delphi essaye de se connecter à la mauvaise instance.
Comment faire pour se connecter à la bonne ?
Voici le code minimaliste qui reproduit le problème :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
procedure TForm1.Button1Click( Sender : TObject );
var
Excel : TExcelApplication;
begin
try
Excel := TExcelApplication.Create( Self );
Excel.ConnectKind := ckRunningInstance;
Excel.Connect;
Excel.Workbooks.Add( xlWBATWorksheet, 0 );
except
on E : Exception do
begin
ShowMessage( E.Message );
end;
end;
end;
end. |
Des images pour mieux comprendre de quoi je parle :
Pièce jointe 331712
Pièce jointe 331715
Merci d'avance.
Tristan
