Bonjour,

J'ai actuellement un problème pour l'enregistrement d'un fichier Excel (sous un autre nom), en essayant de récupérer une application Excel déja ouverte.

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
Variant Wb, vMSExcel, vFileName;
AnsiString FileName;
 
FileName = Form3->SaveAs->Text;
vFileName = ExtractFilePath(Application->ExeName)+ "Sauvegardes\\" + FileName;
 
vMSExcel = Variant::GetActiveObject("Excel.Application");
vMSExcel.PS("DisplayAlerts", false);
try
{
         Wb = vMSExcel.OlePropertyGet("ActiveWorkBook");
         Wb.OleProcedure("Saveas", vFileName);
        ShowMessage("Le fichier a été correctement enregistré sous: " + vFileName);
}
catch (Exception &exception)
{
       Application->MessageBox("Impossible d'enregistrer!!", "Erreur", MB_OK+MB_ICONERROR);
}
J'ai bien inclus au début du fichier: #include <utilcls.h>

D'avance, je vous remercie.