以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  提取一列中后5位字符  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186216)
--  作者：瑞峰
--  发布时间：2023/4/13 17:03:00
--  提取一列中后5位字符
我在FT里 复制一列数据，粘到excel和txt里，都是纵向排列，但粘到SAP(ERP)里，就变成了 横向了。

另外，我要提取 一列中的后5位字符，放在剪切板中。
还是要保持 一列的形式。
可以实现吗？

AA
aa1234x
aa1234c
aa1234v
aa1234b

粘贴后
1234x
1234c
1234v
1234b
--  作者：有点蓝
--  发布时间：2023/4/13 17:13:00
--  
dim s as string

for each r as row in tables("A").rows
s = s & vbcrlf & right(r("第一列"),5)
next

ClipBoard.SetText(s)