🚀 go-pugleaf

On Fri, 03 Feb 2006 14:26:26 +0100, dominik <dominiksmaga@o2.pl> wrote:

> Witam,
>
> Mam taki problem - chcialbym za pomoca tcl'a (tcom albo optcl) zrobic  
> cos takiego:
> 1. Stworzyc nowy dokument worda
> 2. Wstawic naglowek i stopke
> 3. Zdefiniowac tabele, powiedzmy 2x2 i wprowadzic do niej wartosci
>
> o ile pkt 1 jest banalny, to nigdzie nie znalazlem (a szukalem dosyc  
> dlugo) przykladu, ktory by pomogl przy 2 i 3.
> Ma ktos moze jakies doswiadczenie z tym zwiazane i bylby sklonny sie  
> nimi podzielic? Bylbym bardzo wdzieczny

Na początek polecam edytor makro - jest tam opcja przeglądania obiektów.  
Poza tym nagrywając makro można łatwo dojść do tego co się chce zrobić:

     ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2,  
NumColumns:= _
         2, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
         wdAutoFitFixed

Co oznacza mniejwięcej jak dodać tabelę - Selection.Range pewnie trzeba  
jakoś podać inaczej, a atrybuty przekazuje się inaczej w VBA a inaczej w  
com/Optcl. Wszystkie stałe można wyciągnąć z "Object Browsera"...

Nagłówek i stopka:

     ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
     Selection.TypeText Text:="test"

Prawdopodobnie można to jakoś podobnie zrobić...

-- 
WK