mubi_masti
Registered User.
- Local time
- Tomorrow, 01:42
- Joined
- Oct 2, 2011
- Messages
- 46
Hello!!!
I have exported data from access to excel. From access i was able to format the cells of excel as well.
I have changed few properties but can I change the view of exported worksheet from Normal to page break view, change in Zoom and boarder & shading of those cells which have data only instead of whole sheet.
If yes then what will the code for that or any link where i can find help regarding following method
.Application.selection.........
i am using following methods for formatting excel worksheet
.Application.Sheets(sSheet).Select
.Application.Cells.Select
.Application.Selection.ClearFormats
.Application.Rows("1:1").Select
.Application.Selection.Font.Bold = True
.Application.Selection.Font.Name = "Cambria"
.Application.Selection.HorizontalAlignment = -4108
.Application.Cells.Select
.Application.Selection.RowHeight = 14
.Application.Selection.Font.Name = "Arial"
.Application.Selection.Font.Size = 11
.Application.Selection.Columns.AutoFit
.Application.Selection.VerticalAlignment = -4108
.Application.Range("A2").Select
.Application.ActiveWindow.FreezePanes = True
.Application.Columns("A").Select
.Application.Selection.NumberFormat = "dd/mm/yyyy"
I have exported data from access to excel. From access i was able to format the cells of excel as well.
I have changed few properties but can I change the view of exported worksheet from Normal to page break view, change in Zoom and boarder & shading of those cells which have data only instead of whole sheet.
If yes then what will the code for that or any link where i can find help regarding following method
.Application.selection.........
i am using following methods for formatting excel worksheet
.Application.Sheets(sSheet).Select
.Application.Cells.Select
.Application.Selection.ClearFormats
.Application.Rows("1:1").Select
.Application.Selection.Font.Bold = True
.Application.Selection.Font.Name = "Cambria"
.Application.Selection.HorizontalAlignment = -4108
.Application.Cells.Select
.Application.Selection.RowHeight = 14
.Application.Selection.Font.Name = "Arial"
.Application.Selection.Font.Size = 11
.Application.Selection.Columns.AutoFit
.Application.Selection.VerticalAlignment = -4108
.Application.Range("A2").Select
.Application.ActiveWindow.FreezePanes = True
.Application.Columns("A").Select
.Application.Selection.NumberFormat = "dd/mm/yyyy"