Excel VBA 重要参考

Excel VBA 重要参考"/>

Excel VBA 重要参考

'原始的VBA代码（重要参考）

        '1.打开Excel
        Dim exl As New Excel.Application()
        exl.Visible = True

        '2.添加工作簿
        exl.Workbooks.Add()

        '3.设定活动工作表
        'exl.Worksheets("sheets").active()

        '4.打开指定的Excel文件
        'exl.Workbooks.Open("c:/book1.xls")

        '5.显示Excel窗口
        exl.Visible = True

        '6.更改标题栏
        exl.Caption = "aaaaaaaaaaa"

        '7.为单元格赋值
        exl.Cells(1, 4).value = 100
        exl.Range("a1:b5").Value = 50

        '8.设置指定列宽度
        exl.ActiveSheet.columns(1).columnwidth = 20

        '9.设行高
        exl.ActiveSheet.rows(1).rowheight = 1 / 0.035

        '10.在第18行插入分页
        exl.ActiveSheet.rows(18).pagebreak = 1

        '11.在第4列前删除分页符