Lotus Notes 8.5 documents to Excel worksheet
Exporting documents to Excel worksheet. Going well, but need to have the Excel sheet open in landscape. What would be the commands for that? This works fine so far:
currentprocess = "formatting the spreadsheet" wsheet.Name = viewname wsheet.Cells.Font.Size = 10 wsheet.Rows("1:1").RowHeight = 20 wsheet.Rows("1:1").Select wsheet.Rows("1:1").Font.Bold = True wsheet.Cells.EntireColumn.Autofit wsheet.Cells.WrapText = True wsheet.Columns("A:A").ColumnWidth = 6.14 wsheet.Columns("B:B").ColumnWidth = 12 wsheet.Columns("C:C").ColumnWidth = 4.14 wsheet.Columns("D:D").ColumnWidth = 10.86 wsheet.Columns("E:E").ColumnWidth = 14.71 wsheet.Columns("F:F").ColumnWidth = 9.43 wsheet.Columns("G:G").ColumnWidth = 12.43 wsheet.Columns("H:H").ColumnWidth = 14.43 wsheet.Columns("I:I").ColumnWidth = 30 wsheet.Cells.EntireRow.Autofit wsheet.Rows.Borders.LineStyle = 1
Software/Hardware used:
Lotus Notes 8.5
currentprocess = "formatting the spreadsheet" wsheet.Name = viewname wsheet.Cells.Font.Size = 10 wsheet.Rows("1:1").RowHeight = 20 wsheet.Rows("1:1").Select wsheet.Rows("1:1").Font.Bold = True wsheet.Cells.EntireColumn.Autofit wsheet.Cells.WrapText = True wsheet.Columns("A:A").ColumnWidth = 6.14 wsheet.Columns("B:B").ColumnWidth = 12 wsheet.Columns("C:C").ColumnWidth = 4.14 wsheet.Columns("D:D").ColumnWidth = 10.86 wsheet.Columns("E:E").ColumnWidth = 14.71 wsheet.Columns("F:F").ColumnWidth = 9.43 wsheet.Columns("G:G").ColumnWidth = 12.43 wsheet.Columns("H:H").ColumnWidth = 14.43 wsheet.Columns("I:I").ColumnWidth = 30 wsheet.Cells.EntireRow.Autofit wsheet.Rows.Borders.LineStyle = 1
Software/Hardware used:
Lotus Notes 8.5
ASKED:
December 17, 2010 2:46 PM
UPDATED:
December 21, 2010 10:57 AM
Answer Wiki:
Last Wiki Answer Submitted:
Be the first to answer this question.
All Answer Wiki Contributors:
Be the first to answer this question.
To see all answers submitted to the Answer Wiki: View Answer History.
wsheet.PageSetup.Orientation = 2 ‘ xlLandscape