看板 Visual_Basic 關於我們 聯絡資訊
如果我想將我複製的列插入指定的位置(現有儲存格往下移) 目前我是這樣做的 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/ 你的資料如下 《ID暱稱》 () 《上站次數》次 《文章篇數》篇 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.136.46.8