| 以文本方式查看主题 - 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2) ---- 同一列向下循环复制的问题 (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=3362) |
| -- 作者：diule -- 发布时间：2006/8/22 11:09:00 -- 同一列向下循环复制的问题 请教：如何将某列前50行的内容自动复制到本列的下n个50行去？公式如何写？ |
| -- 作者：smileboy -- 发布时间：2006/8/22 11:19:00 -- select结合复制、粘贴函数进行操作 |
| -- 作者：diule -- 发布时间：2006/8/22 11:23:00 -- smileboy 版主：能不能给个公式呀，可以在自定义窗口中应用的。谢谢了！ |
| -- 作者：smileboy -- 发布时间：2006/8/22 11:28:00 -- 发文件 |
| -- 作者：diule -- 发布时间：2006/8/22 11:38:00 -- 没有文件，只是一个想法，试了试做不了！ 按照你的用select，这样的公式：select(1,1,50,1)and do(22)and move(1,51)and do(24)and move(1,101)and do(24)and move(1,151)and do(24)and ............可以吗？ |
| -- 作者：diule -- 发布时间：2006/8/22 11:40:00 -- 好象本人自己试了，无效啊！错在哪呢？ |
| -- 作者：diule -- 发布时间：2006/8/22 11:49:00 -- 是我自己颠倒了，select(1,1,50,1)and do(22)and move(51,1)and do(22)and do(24)and move(101,1)and do(24)and move(151,1)and do(24)and ............这样可以了！ 谢谢 |
| -- 作者：wjq1072 -- 发布时间：2006/8/22 12:02:00 -- 如将前6行复制到7-12行： 自定义按钮：AddRows("表1",6) And Select(1,1,6,Cols) And Do(22) And Move(7,1) And Do(24) |
| -- 作者：diule -- 发布时间：2006/8/22 12:19:00 -- 如果我想循环100次，那公式太长了，有简便的公式吗？ 谢谢 |
| -- 作者：czy -- 发布时间：2006/8/22 12:23:00 -- 想循环多少次都没有问题。 EvalFor(Grid,"第一列","if(row<51,[第一列],Cell(Row-50,""第一列""))") |