Hallo zusammen,
ich öffne aus Delphi herraus eine Excel-Datei die mir vorgegeben ist. Das heisst ich kann diese nicht verändern.
Leider kommt folgende Meldung wenn ich diese Excel-Datei öffne:
Name darf integriertem Namen nicht gleichen:
Alter Name: _FilterDatabase
Neuer Name: "Diesen kann ich dann eintragen z.B. X und dann läuft es auch"
Wie kann ich diese Meldung abfangen oder umgehen ?
So rufe ich Excel auf:
Delphi-Quellcode:
var
WorkBk: _WorkBook; // ein WorkBook deklarieren
WorkSheet: _WorkSheet; // ein WorkSheet deklarieren
XLApp: TExcelApplication;
_lcid: LCID;
begin
_lcid := GetUserDefaultLCID;
XLApp := TExcelApplication.Create(XLApp);
try
// Zum Server TExcelApplication verbinden
XLApp.ConnectKind := ckNewInstance;
XLApp.Connect;
try
// WorkBooks zur ExcelApplication hinzufügen
XLApp.Workbooks.Open(copy(Application.ExeName,1, length(Application.ExeName)-11) + 'Formulare\Formular.xlsm', emptyParam, FALSE,
emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,
emptyParam, emptyParam, emptyParam, emptyParam, emptyParam,
emptyParam, emptyParam, _lcid);
// erstes WorkBook auswählen
WorkBk := XLApp.WorkBooks.Item[1];
// erstes WorkSheet definieren
WorkSheet := WorkBk.WorkSheets.Get_Item(1) as _WorkSheet;
//WorkSheet := Workbk.sheets['Bestellformular'] as _WorkSheet;
...
Bei "Open" kommt dann diese Meldung.
Danke schon mal
Holger