[問題] vba copy 改成 =
(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:
版本:
小弟遇到一個複製資料的問題
在錄製巨集上時常會用
select
Selection.Copy
Selection.PasteSpecial Paste:
之類的語法
我想縮短這種語法
開始改成類似這樣的寫法
Sheets(2).Range("A1") = Sheets(1).Range("A1")
不過小弟訪問的資料是多個儲存格範圍(是連在一起的,長或方)
網路上也有教範圍的複製
Sheets(2).Range("A1") = Sheets(1).Range("A1:P1")
但很詭異的狀況
不曉得是否為範圍列過大,或者數字太多,
我逐行測試時,資料一直沒有出現
i= 15xxx ,j = 16xxx
Sheets("運算").Range("A1") = _
Sheets("員工分析").Range("A" & j & ":" & "aa" & i - 1)
可運行
"員工分析"表中確實有資料
運行後
"運算"表中 完全無資料,或者a1有出現一些字,其他全部空白
但也不曉得發生什麼問題了
我有試著乾脆改用迴圈一點一點填入,但時間超級久,好像不太好
我該試著用什麼方式會比較恰當呢?
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.35.158.244
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1475975489.A.526.html
→
10/09 09:27, , 1F
10/09 09:27, 1F
→
10/09 09:28, , 2F
10/09 09:28, 2F
感謝s大
我剛也發現原來要貼上的大小,要等於複製的儲存格大小
那我們平常滑鼠複製貼上
他會自動貼上原本的大小
也是跟s大說的range.resize的意思相同嗎?
※ 編輯: waiter337 (114.35.158.244), 10/09/2016 09:35:42
我大概懂您的意思了
所以找出數據源的row跟col基本上是需要的
因為要貼上的地方(假設要排序)需要很準確的位置置入範圍
如果沒有row跟col,數值大小基本上都會過多或少於範圍內,
引響順序或其他資料
否則只能一格一格抓的意思
不過我先在測試一下好了
我好像.value 沒打到
跟貼上範圍沒有太確定(感覺有試過提供相同大小的範圍但失敗)
※ 編輯: waiter337 (114.35.158.244), 10/09/2016 09:47:29
→
10/09 09:47, , 3F
10/09 09:47, 3F
→
10/09 09:52, , 4F
10/09 09:52, 4F
→
10/09 09:52, , 5F
10/09 09:52, 5F
→
10/09 09:54, , 6F
10/09 09:54, 6F
→
10/09 09:55, , 7F
10/09 09:55, 7F

→
10/09 09:57, , 8F
10/09 09:57, 8F
→
10/09 10:34, , 9F
10/09 10:34, 9F
→
10/11 16:46, , 10F
10/11 16:46, 10F
→
10/11 16:46, , 11F
10/11 16:46, 11F
→
10/11 16:47, , 12F
10/11 16:47, 12F
→
10/11 16:48, , 13F
10/11 16:48, 13F
→
10/11 16:49, , 14F
10/11 16:49, 14F
→
10/11 16:49, , 15F
10/11 16:49, 15F
→
10/11 16:49, , 16F
10/11 16:49, 16F
→
10/11 16:50, , 17F
10/11 16:50, 17F
→
10/11 16:50, , 18F
10/11 16:50, 18F
→
10/11 16:51, , 19F
10/11 16:51, 19F
→
10/11 16:51, , 20F
10/11 16:51, 20F
→
10/11 16:53, , 21F
10/11 16:53, 21F
Office 近期熱門文章
PTT數位生活區 即時熱門文章