Foxtable(狐表)用户栏目专家坐堂 → 复制粘贴问题


  共有1731人关注过本帖平板打印复制链接

主题:复制粘贴问题

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/5/5 10:40:00 [只看该作者]

增加复制和粘贴2个按钮

复制按钮把选择的行和列记录到全局变量中,比如
vars("行")= tables("表A").current
vars("列1")= tables("表A").LeftCol


Dim r1 As Row = vars("行")
For Each r As Row In Tables("员工").GetCheckedRows
    r(vars("列1")) = r1(vars("列1"))
Next

 回到顶部