Odczyt danych z komórki EXCELA

[Corvis]

Witam,

Mam program ktory zapisuje mi dane do 1 komórki EXCELA. Chciałbym zrobić swój program w taki sposób abym te dane miał bezpośrednio w moim programie. A nie w pliku Excela. Ten program który zapisuje te dane może to robić tylko do EXCELA. Jak to zrobić żeby wlatywało to odrazu do mojej aplikacji ???


Pozdrawiam


EDIT:

Dodam jeszcze, żeby działało zrzucanie danych arkusz excela musi być cały czas otwarty.

[Cyfrowy Baron]

Chciałbym zrobić swój program w taki sposób abym te dane miał bezpośrednio w moim programie. A nie w pliku Excela.

Czyli chcesz napisać program, który będzie czytał pliki w formacie XLS?

[wargo]

Raczej aby przesyłał dane do excela, który otworzył plik...

[Cyfrowy Baron]

Mam program ktory zapisuje mi dane do 1 komórki EXCELA.

Co to za program? Ty go napisałeś, czy też to jakiś inny, jaki?

[polymorphism]

Corvis, brawo za zadanie zrozumiałego pytania

Dwie potencjalne odpowiedzi:

• jeśli chodzi o czytanie plików XLS, to ta opcja raczej odpada. Jest to format zamknięty.
• jeśli chodzi o komunikację aplikacja <-> excel, wtedy zastosuj mechanizm OLE automation. Po szczegóły odsyłam do PSDK.

[Cyfrowy Baron]

Istnieje jeszcze trzecia możliwość. Jakiś program wysyła do 1 komórki Excela jakieś dane, a Corvis chce te dane przechwycić do swojego programu, ale bez udziału Excela, czyli jakiś program wysyła dane do 1 komórki Excela bez Excela.

[Corvis]

Właśnie coś mi się wydawało, że pokrętnie to napisałem Sorry


1. Program ktróry zapisuje dane do komorki EXCELa to ROUTERS do notowań giełdowych - nie jest mój
2. Problem polegam na tym, że wersja która mam może to zrobić tylko do EXCELa ( dokładnie do 1 komórki )
3. Ja muszę się dostać swoją aplikacja do danych które są wysyłane do tej komórki EXCELA

Próbuje to zrobić poprzez ADO

Ustawiłem sobie ConnectionString:

Kod: Zaznacz cały

Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Users\IMS\Desktop\Zeszyt1.xls;Mode=Read;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=35;Jet OLEDB:Database Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False;

I wszystko jest fajnie, jak plik Zeszyt1.xls nie jest otwarty (wtedy podłączam się do niego jak chce). Jeżeli uruchamiam notowania i zapis do komórki EXCELA nie mogę się już połączyć przez ADO bo pisze, że plik jest używany - próbowałem ustawić połączenie jako READ ONLY ale o nic nie daje.


Sorry, za wczesniejsze słąbe wyjasnienie

[mckri]

Ja dawno temu skorzystałem z komponentu (niestety nie darmowego). Bez pomocy programu MS Excel możliwy jest zarówno zapis jak i odczyt danych z pliku xls. Obsługa funkcji komponentu i komunikacja z plikiem xls bezproblemowa. Podaję link: http://www.axolot.com/

[Cyfrowy Baron]

Jeżeli ten program jest zaprogramowany do tego, żeby wysyłać dane do programu Excel to do Twojego ich nie wyśle. Można by oczywiście stworzyć aplikację, która by udawała Excela, czyli program miałby nazwę klasy okna XLMAIN (Office 2003) a tabela miałaby nazwę klasy EXCEL7. Mogłoby to zadziałać tylko przy założeniu, że ten ROUTERS pobiera uchwyt do programu poprzez nazwę klasy okna i nazwę klasy tabeli. To jednak nie wystarczy, gdyż ten program wysyła konkretne komunikaty, które Twój program musiałby obsłużyć. Należałoby więc ustalić co to są za komunikaty. Gdyby udało się to zadanie zrealizować w ten sposób, Twój problem zostałby rozwiązany, gdyż ROUTER wysyłałby dane bezpośrednio do Twojego programu.

Co do tego, że plik jest używany, to prawdopodobnie jest on używany przez program ROUTERS, który go blokuje, gdyż Excel nie blokuje plików. Dopóki działa ROUTERS nie uzyskasz dostępu do pliku.

[Corvis]

Dzięki za odpowiedzi.


Na tą chwilę stoje na czymś takim:


1. W EXcelu w zakładce Narzędzia Udostępnij Skoroszyt zaznaczyłem opcję : Pozwalaj na zmiany wprowadzane przez wielu użytkowników jednocześnie.
2. Stworzyłem swój program za pomoca ADOConnection i ADODataSet oraz TTimera.

Program działa następująco ( i działa ale działa wolnooooo zaraz wyjaśnię czemu )

- ConnectionString AdoConnection:

Kod: Zaznacz cały

Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Users\IMS\Desktop\Zeszyt1.xls;Mode=Read;Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=35;Jet OLEDB:Database Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False;HDR=No;IMEX=1;

- CommandText AdoDataSet:

Kod: Zaznacz cały

SELECT *FROM [Arkusz1$];

Gdy odpalam DataSeta - wszystko działa. Problem pojawia się w tedy gdy teraz chce zapisać coś w Excelu ( Excel wywala błąd, że plik jest zablokowany - mimo udostępnienia do modyfikownia przez innych)

Dlatego w TTimerze zrobiłem coś takiego: ( Jest to bardzooooooo słabe rozwiązanie )

Kod: Zaznacz cały

AdoDataSet->Open(); <--- otwarcie i pobranie danych z excela
AdoConnection->Close(); <--- odblokowanie pliku


Działa to wolno, bo za każdym tikiem timera musze się łączyć i rozłączać przez ADOConnection - inaczej blokuje Excela. Jeżeli jest to zrobione tak jak napisałem da się modyfikować excela i po zapisaniu danych w excelu zmiana jest widoczna w moim programie. Alllleeeeeeeeeeeeeee działa to dopiero wtedy gdy zapiszę arkusz excela . Podejście z Timerem i łączeniem i rozłączaniem zamula aplikację bo TTimer musi chodzić bardzo szybko co 10 ms conajmniej. ( To wynika z moich potrzeb otrzymywania danych. Niewiem jak zrobić AutoSave w Excelu jak tylko coś się zmieni. ( o ile tak się wogole da )


Pozdrawiam,

[Cyfrowy Baron]

Niewiem jak zrobić AutoSave w Excelu jak tylko coś się zmieni.

Excel nie ma takiej funkcja, ale możesz wysłać do Excela polecenie zapisania do pliku Zapisz (komenda 4) lub Zapisz Jako (komenda 5):

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

HWND hWnd = FindWindow("XLMAIN", 0);
 if(hWnd == NULL)
 {
  ShowMessage("Nie odnaleziono programu");
  return;
 }


 SendMessage(hWnd, WM_COMMAND, 4, 0);
 //Zapisz jako: SendMessage(hWnd, WM_COMMAND, 5, 0);
 

Testowane na Excel 2003

[polymorphism]

3. Ja muszę się dostać swoją aplikacja do danych które są wysyłane do tej komórki EXCELA

A próbowałeś wspomniany OLE automation? Bo z tego co wyczytałem, ADO to interfejs bazodanowy, i raczej operuje na pliku XLS, a nie bezpośrednio na excelu.

[Corvis]

A próbowałeś wspomniany OLE automation? Bo z tego co wyczytałem, ADO to interfejs bazodanowy, i raczej operuje na pliku XLS, a nie bezpośrednio na excelu.

jeszcze nie, zaraz zobacze



EDIT:


http://blong.co.uk/Conferences/BorConUK ... BcbOle.htm

Ma ktoś jakiś opis tego Ole automaticon pod buildera ???

bo te co sa to dla wersji 5-6 i ni w kij nie pasuje do 2010

[polymorphism]

http://www.codeproject.com/KB/office/MSOfficeAuto.aspx <- Miluśki COM

Lista metod/właściwości excel.application link.

[polymorphism]

I co, jak postępy z OLE automation?