FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Excel
Posts: 283
Joined: Sat Oct 15, 2005 06:40 AM

Excel

Posted: Sun Aug 24, 2008 12:53 AM
Dear friends,
an excel sheet with data and now I necessity to prepare to print
The required settings are:
- 1 page on width
- first row to title
- print grid
- to set the orientation if the cOriente contain "V" Portrait or "O" for
Landscape.

This code do not work:
WITH OBJECT oExcel:ActiveWorkbook:Worksheets("Sheet1"):PageSetup()
  :PrintTitleRows    := "$1:$1"
  :PrintTitleColumns := ""
END
// oExcel:ActiveWorkbook:Worksheets("Sheet1"):PageSetup:PrintArea := ""
WITH OBJECT oExcel:ActiveWorkbook:Worksheets("Sheet1"):PageSetup()
  // :Orientation := IF( cOriente == "V",xlPortrait,xlLandscape )
  :PrintGridlines    := 1 // True
  :PrintHeadings     := 0 // False
  // :Zoom              := 0 // False
  :FitToPagesWide    := 1
  :FitToPagesTall    := 0
  // :PrintErrors       := 0 // xlPrintErrorsDisplayed
END


PrintArea, Orientation, Zoom and PrintErrors create errors :-)

Can you help me?
Ciao, best regards,

Ugo

Continue the discussion