Foxtable(狐表)用户栏目专家坐堂 → 区域复制


  共有3295人关注过本帖树形打印复制链接

主题:区域复制

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/27 15:35:00 [显示全部帖子]

1、默认就可以,复制后,随便选中一个单元格,然后粘贴即可

2、错误所在事件:ddpsb,ChangeEdit -- 贴出代码

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/27 15:40:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/27 16:02:00 [显示全部帖子]


 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/27 16:45:00 [显示全部帖子]

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

Dim txt2 As String=e.form.dropdownbox.text
Dim tb2 As Table = Tables("变压器模糊输入_Table1")
msgbox(txt2 )
If txt2 = "" Then
    tb2.Filter = ""
Else
    txt2 = "'%" & txt2 & "%'"
msgbox(txt2 )
    tb2.Filter = "变压器型号 Like " & txt2 &  " or 变压器类型 like "  & txt2 & " or 变压器容量 like " & txt2 & " or 电压等级 like " & txt2
msgbox( tb2.Filter)
  End If

 回到顶部