以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何用鼠标下拉单元格的形式复制内容  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92157)

--  作者:clchen
--  发布时间:2016/10/27 16:22:00
--  如何用鼠标下拉单元格的形式复制内容
如何在Table控件中用鼠标往下拖单元格的形式 复制单元格的内容
--  作者:有点蓝
--  发布时间:2016/10/27 16:44:00
--  
With Tables("表A")
    Dim o As object = .Rows(.TopPosition)(.LeftCol)
    For i As Integer = .TopPosition + 1 To .BottomPosition
        .Rows(i)(.LeftCol) = o
    Next
End With

--  作者:clchen
--  发布时间:2016/10/27 17:34:00
--  
这个写在那个事件里????
--  作者:有点蓝
--  发布时间:2016/10/27 17:47:00
--  
按钮或者快捷菜单的事件
--  作者:clchen
--  发布时间:2016/10/28 9:18:00
--  
这个能写在Table事件里面么 
--  作者:有点蓝
--  发布时间:2016/10/28 9:20:00
--  
不建议。容易误操作