返回列表 上一主題 發帖

[發問] Range.Copy Destination:=Range報錯

sunnyso

帖子
605 
主題
92 
精華
0 
積分
648 
點名
0  
作業系統
windows 
軟體版本
7 
閱讀權限
50 
性別
男 
來自
macau 
註冊時間
2013-4-5 
最後登錄
2019-2-10 

熱烈參與勳章好學求知勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-7-24 14:38 | 顯示全部帖子

[發問] Range.Copy Destination:=Range報錯

請教各位大大，code 如下，執行後存檔關閉Excel會報錯 “圖片太大，超出的部分將被截去。”
工作表中沒有圖片。請問哪裏有問題？

還有請問如何寫code可以有效率的 copy 大量資料，我用 Range("B11:BG30010").Value = Sheets("Sheet1").Range("A1:BF30000").Value 很慢。
等級有限不能上傳超過1MB附件，只好分3部分。
data copy - sonny1 - Copy.part1.rar (921.6 KB) data copy - sonny1 - Copy.part2.rar (921.6 KB) data copy - sonny1 - Copy.part3.rar (351.83 KB)
  1. Private Sub Worksheet_Activate()
  2.     Cells.ClearContents
  3.     Sheets("Sheet3").UsedRange.Copy Destination:=Range("B11")
  4. End Sub
複製代碼
sonny-e.gif
收藏 分享
ss

sunnyso

帖子
605 
主題
92 
精華
0 
積分
648 
點名
0  
作業系統
windows 
軟體版本
7 
閱讀權限
50 
性別
男 
來自
macau 
註冊時間
2013-4-5 
最後登錄
2019-2-10 

熱烈參與勳章好學求知勳章
2#
發表於 2013-7-25 01:51 | 顯示全部帖子
回復 3# kimbal

感謝大大，問題已解決。
ss

TOP

        靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。
返回列表 上一主題