以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  复制粘贴  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=105642)
--  作者：放飞心情
--  发布时间：2017/8/23 14:17:00
--  复制粘贴
录入数据时，复制一个单元格，想把它一次粘贴到选中的多个单元格中，只能粘贴到第一个。也不能像EXECL那样通过右下角十字进行拖拽进行复制填充，有什么办法解决吗？
--  作者：有点甜
--  发布时间：2017/8/23 14:42:00
--  

 代码实现

 


For i As Integer = CurrentTable.TopRow To CurrentTable.BottomRow
    For j As Integer = CurrentTable.LeftCol To CurrentTable.RightCol
        CurrentTable(i,j) = ClipBoard.GetText
    Next
Next
--  作者：放飞心情
--  发布时间：2017/8/23 15:16:00
--  
如果没有能够简单实现的方法，我觉得应该完善功能
--  作者：有点甜
--  发布时间：2017/8/23 15:29:00
--  
你做个按钮，或者菜单，选中后点击一下，不是也有同样效果？