| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 复制粘贴后出现表格外的内容 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170894) |
| -- 作者：wangglby -- 发布时间：2021/8/10 16:55:00 -- 复制粘贴后出现表格外的内容 用以下代码把选中的数据加到剪切板，粘贴后会多出1列
比如 第一列 第二列
1111 2222
选中这2个单元格，用以下代码复制后， 粘贴后变成了 1111 false 2222
请问这怎么解决？
Dim t As Table = CurrentTable
Dim ss As new StringBuilder
For i As Integer = t.TopPosition To t.BottomPosition
Dim s As String =""
For j As Integer = t.LeftCol To t.rightcol
s = s & t.Rows(i)(j) & vbtab
Next
ss.AppendLine(s.Trimend(vbtab))
Next
ClipBoard.SetText(ss.ToString)
|
| -- 作者：有点蓝 -- 发布时间：2021/8/10 16:59:00 -- 测试没有问题，请上传实例说明 |
| -- 作者：wangglby -- 发布时间：2021/8/10 17:05:00 -- 代码没问题，是不是表格的列的顺序有什么要求，比如 第一列和第二列中间有个第三列，而第三列被移到其他地方了，复制的时候是不是一起给复制了？ |
| -- 作者：有点蓝 -- 发布时间：2021/8/10 17:17:00 -- 不会 |