Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Mehre Excel Instanzen Verwalten. (https://www.delphipraxis.net/190503-mehre-excel-instanzen-verwalten.html)

LebensAdler 10. Okt 2016 14:06

Mehre Excel Instanzen Verwalten.
 
Hallo Liebe Community,
gibt es einen Weg wie man mehre Excel Dokumente Gleichzeitig über OLE oder eine andere Möglichkeit nutzen kann (Schreiben und lesen) ?
Denn nur ein Excelliste gleichzeitig bearbeiten zu können ist ein großer Flaschenhals bei uns.

Gruß,
LebnsAdler

p80286 10. Okt 2016 15:08

AW: Mehre Excel Instanzen Verwalten.
 
Zitat:

Zitat von LebensAdler (Beitrag 1350370)
Hallo Liebe Community,
gibt es einen Weg wie man mehre Excel Dokumente Gleichzeitig über OLE oder eine andere Möglichkeit nutzen kann (Schreiben und lesen) ?
Denn nur ein Excelliste gleichzeitig bearbeiten zu können ist ein großer Flaschenhals bei uns.

"eine Liste gleichzeitig"?????
natürlich kannst Du mehrere Office/Excel-Dateien gleichzeitig öffnen (an einem Arbeitsplatz) und diese "gleichzeitig" bearbeiten.
Du solltest u.U. etwas konkreter werden in Deiner Fragestellung, da es Situationen geben könnte in denen dies vielleicht doch nicht der Fall ist.

Gruß
K-H

nahpets 10. Okt 2016 17:09

AW: Mehre Excel Instanzen Verwalten.
 
Hier mal sowas in der Art (nur mit Word):
Delphi-Quellcode:
function tForm1.DokumentOeffnen(
  aWordDocument : TWord11Document;
  aDateiname : String;
  aVisible : Boolean = false) : Boolean;
var
  vDateiname  : OleVariant;
  vVisible    : OleVariant;
  vFalse      : OleVariant;
begin
  try
    vDateiname := aDateiname;
    vVisible  := aVisible;
    vFalse    := False;
    WordApplication.Connect;
    WordApplication.Documents.Open(vDateiname, EmptyParam, vFalse, vFalse,
                                   EmptyParam, EmptyParam, EmptyParam, EmptyParam,
                                   EmptyParam, EmptyParam, EmptyParam, vVisible,
                                   EmptyParam, EmptyParam, EmptyParam, EmptyParam);
    aWordDocument.ConnectTo(WordApplication.ActiveDocument);
    Result := True;
  except
    on e : Exception do begin
      Result := False;
    end;
  end;
end;
Dieser Funktion wird eine Variabel vom Typ TWord11Document übergeben. Von denen gibt es im Programm mehrere. Das Ganze ist mit Delphi 7 geschrieben und nutzt Word_TLB.

Mit Excel müsste das analog auch gehen. Für jede Exceldatei 'ne eigene Variabel.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:26 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz