Set Workbook Size

[MeldrethMan]

I'm sending data to Excel from a selector form and would like to control the workbook dimensions so it is visible without scrolling.

This is the early part of the code for exporting

Dim objXL As Excel.Application
Dim objWkb As Excel.Workbook
Dim objSht As Excel.Worksheet
Dim rst As Recordset
Dim iRow As Integer
Dim iCol As Integer

Set objXL = CreateObject("Excel.Application")
Set objWkb = objXL.Workbooks.Add

'Create First Worksheet
Set objSht = objWkb.Worksheets("sheet1")
objSht.Name = "All"


Any thoughts appreciated.

 

[genomon]

This forum is for MS Access forms. You may get better help here: forum707

Beir bua agus beannacht!

 

[MeldrethMan]

Ok thanks, genomon, this looks to put me on the right track.