InsertListItem
InsertLines在一个代码块的某个指定位置，插入一行或多行的代码。
语法
object.InsertLines(line,code)
InsertLines语法有以下几个部分：
部分
描述
object
必需的。一个对象表达式，其值是 “应用于” 列表中的一个对象。
Line
必需的。一个Long型数，用来指定要插入代码的位置。
Code
必需的。一个String型数据，即要插入的代码。
说明
如果使用 InsertLines 方法所插入的文本用换行回车分隔，则将依此插入一些行。
InsertLines 方法示例下列示例使用 InsertLines 方法将“Option Explicit”这行文本插入到指定的代码窗格中。
Application.VBE.CodePanes(1).CodeModule.InsertLines