Word VBA instructions in FW

Word VBA instructions in FW

Postby driessen » Thu Mar 08, 2007 11:46 am

Hello,

How do I put the next lines in a OLE-instruction in FW ?

Code: Select all  Expand view
    Application.WindowState = wdWindowStateNormal
    Application.Move Left:=0, Top:=43
    Application.Resize Width:=768, Height:=553


Thank you.

Michel
Regards,

Michel D.
Genk (Belgium)
_____________________________________________________________________________________________
I use : FiveWin for (x)Harbour v. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium

Postby Rochinha » Thu Mar 08, 2007 1:32 pm

Code: Select all  Expand view
          oWord:=TOleAuto():New( "Word.Application" )
          oWord:Documents:Open( "C:\AUTOEXEC.BAT" )
          oWord:Top              := 0
          oWord:Left              := 43
          oWord:Width           :=768
          oWord:Height          :=553
          oWord:Visible          := .t.
          oWord:Visible          := .t.
          oWord:Visible          := .t.
          oWord:WindowState := 1
Rochinha
 
Posts: 310
Joined: Sun Jan 08, 2006 10:09 pm
Location: Brasil - Sao Paulo

Postby driessen » Thu Mar 08, 2007 4:41 pm

Rochinha,

Thanks a lot.

I'll try it out.

Michel
Regards,

Michel D.
Genk (Belgium)
_____________________________________________________________________________________________
I use : FiveWin for (x)Harbour v. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 57 guests