If MessageBox.Show("是否打开导出表?","确认",MessageBoxButtons.OKCancel,MessageBoxIcon.Question) =DialogResult.OK Then
Dim book1 As new xls.book( "d:\集团汇总.xls" )
book1.sheets.SelectedIndex = 1
Dim Sheet As XLS.Sheet = Book1.Sheets(0)
Sheet.Cols.Frozen = 2
book1.save( "d:\集团汇总.xls" )
Dim Proc As New Process
Proc.File = ( "d:\集团汇总.xls" )
Proc.Start()
End If
上述代码什么在打印时不能冻结前两列?即是工作表前两列在多页打印时,都显示。