导出到Excel后，表已打开，将第一行冻结，代码怎么写？

殷小宝　发表于：2012-07-22 22:50:00 　

下面的代码为何不能将导出的表的第一行冻结呢？

DoCmd.OutputTo acOutputForm, "frmypkcsl_child", "MicrosoftExcelBiff8(*.xls)", "", True，""，0

    ActiveWindow.Range("A2").Select
    With ActiveWindow
        .SplitColumn = 0    '第一列
        .SplitRow = 1    '第2行
    End With
ActiveWindow.FreezePanes = True

Top

叶海峰发表于：2012-07-23 08:41:20

DoCmd.OutputTo acOutputForm, "frmypkcsl_child", "MicrosoftExcelBiff8(*.xls)", "", True，""，0这个代码是在access里面执行的, ActiveWindow.Range("A2").Select这些是在excel执行的,如果你要在access里面执行excel的代码,要先打开一个excel.application

Top

殷小宝发表于：2012-10-07 16:14:23

冻结窗口现在发现很容易：

Dim ExcelApp As Excel.Application

ExcelApp.Range("A2").Select

ExcelApp.ActiveWindow.FreezePanes = True

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

[5分]导出到Excel后，表已打开，将第一行冻结，代码怎么写？