Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Excel 2003 object model
Doug/Tom, I found the PageSetup properties! I was under the Sheet object.
Thanks a bunch. - Jim "Doug Glancy" wrote: Jim, I'm rank beginner at VB.Net, but this works for me. (It's a console app, but I think it would apply). PageSetup and PrintTitleRows both showed up in IntelliSense. Sub create_excel_workbook() Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet xlApp = CType(CreateObject("Excel.Application"), Excel.Application) xlBook = CType(xlApp.Workbooks.Add, Excel.Workbook) xlSheet = CType(xlBook.Worksheets(1), Excel.Worksheet) xlSheet.PageSetup.PrintTitleRows = "$3:$3" ' Show the sheet xlSheet.Application.Visible = True End Sub Otherwise, sounds like a post to microsoft.public.dotnet.languages.vb is in order. hth, Doug "Jim" wrote in message ... Thanks for the response Doug. This is code inside excel right? meaning VBA code. I'm actually not doing these modifications in excel/VBA. In an ASP .NET, I am using FSO and the Excel 2003 reference to open an excel file and then modify. FYI, when I start coding: Workbook.ActiveSheet, the intellisense is not picking up .PageSetup. Therefore, Workbook.ActiveSheet.PageSetup does not exist. "Doug Glancy" wrote: Jim, The Macro Recorder is good for figuring out things like this. In XL2003 I turned on the recorded, changed the margins and got this wealth of info: Sub Macro1() ' ' Macro1 Macro ' Macro recorded 10/8/2004 by Doug Glancy ' ' With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With ActiveSheet.PageSetup.PrintArea = "" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = "" .LeftMargin = Application.InchesToPoints(0.25) .RightMargin = Application.InchesToPoints(0.25) .TopMargin = Application.InchesToPoints(1) .BottomMargin = Application.InchesToPoints(1) .HeaderMargin = Application.InchesToPoints(0.5) .FooterMargin = Application.InchesToPoints(0.5) .PrintHeadings = False .PrintGridlines = False .PrintComments = xlPrintNoComments .PrintQuality = -3 .CenterHorizontally = False .CenterVertically = False .Orientation = xlPortrait .Draft = False .PaperSize = xlPaperLetter .FirstPageNumber = xlAutomatic .Order = xlDownThenOver .BlackAndWhite = False .Zoom = 100 .PrintErrors = xlPrintErrorsDisplayed End With End Sub hth, Doug Glancy "Jim" wrote in message ... Hello. I'm looking to alter some page setup properties (margins, orientation, top row to repeat at top). It seems there are no such properties (workbook and worksheet properties) to modify. Or am I incorrect. Any help is appreciated. This pertains to an app where i open an existing excel file, modify, save then leave. Thanks, Jim |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
VBA: Where to find Excel Object model? | Excel Discussion (Misc queries) | |||
"Excel.Application" Object Model | Charts and Charting in Excel | |||
Excel object model | Excel Programming | |||
Docs for Excel object model with p/e/m | Excel Programming | |||
Subtotals in Excel object model | Excel Programming |