作者ClubT (勇气是实现梦想的魔法)
看板Visual_Basic
标题[VBA ] 插入复制的选项
时间Thu Mar 5 16:23:50 2009
如果我想将我复制的列插入指定的位置(现有储存格往下移)
目前我是这样做的
i是要插入的列数
With Application
.Sheets(2).Rows("1:5").Copy
.Sheets(1).Cells(i, 1).Insert Shift:=xlDown
End With
有办法把他缩成一个指令吗?
这样效果应该可以快一些
如果是单纯的复制贴上(储存格不动)
Application.Sheets(2).Rows("1:5").Copy Destination:=MyDocApp1.Cells(i, 1)
会比
复制→选取要贴上的储存格→贴上 来的快
不知道插入有没有类似的方法
THANKS ^^
--
《我的Blog》
http://clubtblog.blogspot.com/
你的资料如下
《ＩＤ昵称》 ()
《上站次数》次
《文章篇数》篇
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.136.46.8