[vbs] jak z pliku word wydobyc...

Autor: mrk <no.entered_at_hot.com>
Data: Tue 19 Oct 2010 - 19:00:44 MET DST
Content-Type: text/plain; charset=ISO-8859-2; format=flowed
Message-ID: <4cbdcebc$0$20989$65785112@news.neostrada.pl>

Witam

Dokladnie to chodzi mi o wydobycie z tabeli w pliki word (*.doc) wartosci.

Robie w pliku excel na probe cos takiego:

Dim zmie
'Set obxls = ActiveWorkbook.Worksheets("arkusz1")
Set objw = CreateObject("word.application")
Set oword = objw.documents.Open("c:\tab.docx")
Set owtab = oword.tables(1)
zmie = owtab.cell(1, 1)
oword.Close
MsgBox (zmie)
'obxls.cells(1,1).Text = zmie

po uruchomieniu wyswietla sie cos (co prawda w nowej lini jest jakis
krzaczek)
jak odkomentuje zeby wstawialo sie w komorke excel'u, to wywala blad.
Chyba o niezgodnosc typow.

-----------------------
mrk
no.entered@hot.com
Received on Tue Oct 19 19:05:03 2010

To archiwum zostało wygenerowane przez hypermail 2.1.8 : Tue 19 Oct 2010 - 19:42:02 MET DST