以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何用代码在Excel中最下面增加行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=73056)

--  作者:sara
--  发布时间:2015/8/11 16:20:00
--  如何用代码在Excel中最下面增加行
我想在AfterBuild事件中给Excel表最后一行后面追加一行,写我想写的内容,我该怎么写代码?
--  作者:sunsenfeng
--  发布时间:2015/8/11 16:31:00
--  
一般情况下,用Usedrange.rows.count确定末尾行的位置,然后再填入内容


--  作者:大红袍
--  发布时间:2015/8/11 16:47:00
--  
Select e.Book.TempLate
    Case "模板1"
        Dim s As XLS.Sheet = e.Book.Sheets(0)
        s(s.Rows.Count, 0).Text = "1234"
        s(s.Rows.Count, 1).Text = "1234"
        s(s.Rows.Count, 2).Text = "1234"
End Select