以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于InsertNew  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98806)

--  作者:WENFEIZHU
--  发布时间:2017/4/7 12:13:00
--  [求助]关于InsertNew
关于InsertNew的帮助文件很简单,而这个方法是在当前行上面新增一行,有没有办法在当前行下面新增一行?

--  作者:jiskin
--  发布时间:2017/4/7 12:31:00
--  

--  作者:jiskin
--  发布时间:2017/4/7 12:42:00
--  
With Tables("表name")
    If .Current IsNot Nothing Then
        If .Rows.count = .Position +1 Then
            .AddNew
        Else
            .Position = .Position +1
            .InsertNew
        End If
    End If
End With


--  作者:WENFEIZHU
--  发布时间:2017/4/7 13:26:00
--  
谢谢,确实可用~!