Excel_2010 öffnen -> _FilterDatabase

[HolgerCW]

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

[Jumpy]

Hallo,

kommt diese Meldung auch, wenn du die Excel-Datei von Hand öffnest?

[HolgerCW]

Nein, dann kommt die Meldung nicht.

Was kann ich tuen.

Die Excel-Datei ist vorgegeben. Kann da also auch nichts ändern ...

[p80286]

Hast Du Dir mal den "NamensManager" (Formeln->Definierte Namen -> Namensmanager) angeschaut?

Wenn beim Erstellen der Excel-Datei etwas schief gegangen ist, könnte man dies vllt. abstellen?

Gruß
K-H

[Jumpy]

Mir ist auch noch nicht ganz klar, ob das eine Excel-Meldung ist oder woher die kommt. Du öffnest ja eine .xlsm Datei. Werden da beim On_Open-Event schon irgendwelche Dinge ausgeführt?

[p80286]

Angeblich kommt dies bei Excel öfters vor und hat meist mit einer Überschneidung der Druckbereiche bzw. der zugehörigen Namensgebung zu tun.
(warum fällt das nicht auf wenn die Datei geschlossen wird?)

Gruß
K-H

[Ostsee]

Ich habe die gleichen Probleme beim Workbooks.Open.
Trotz displayalerts :=False kommt die Meldung.
Es liegt definitiv an einer Excel-Datei mit Filter.
Bei Dateien ohne Filter habe ich kein Problem.
Über den Namensmanager sieht man _FilterDatabase nicht.

Hat jemand schon eine Lösung ?

[Chemiker]

Hallo Ostsee,

Herzlich Willkommen in der DP.
Dieser Fehler kann leider vorkommen bei gefilterten Daten. Ich glaube es hängt mit dem Dateinamen zusammen, der für die Mappe verwendet wird. Ich habe zurzeit kein Excel 2010 zu Hand. Aber wenn man unter z.B. „Filter_Mappe_normal.xlsx.“ abspeichert, dann einige Filter aktiviert kann es vorkommen das irgendwann die Fehlermeldung kommt. Wenn diese Fehlermeldung gekommen ist, nutzt es auch nichts die Filter herauszunehmen man bekommt die Datei nicht mehr unter OLE geladen. Selbst wenn man den in Workbook.Open Parameter [CorruptLoad:= xlRepairFile] setzt bekommt man die Datei nicht geladen.
Wenn man die Daten gefiltert in einem z.B. StringGrid einlesen will müssen sie besonders behandelt werden. Die üblichen Möglichkeiten würden alle Daten (also ungefiltert) einlesen, auch wenn z.B. eine Summe gebildet worden ist von den gefilterten Daten, so wird diese Summe auch im StringGrid angezeigt.
Welchen Dateinamen hast Du verwendet?

Bis bald Chemiker