標題:
[發問]
如何複製到現有儲存格貼上"值"?
[打印本頁]
作者:
av8d
時間:
2012-4-23 12:53
標題:
如何複製到現有儲存格貼上"值"?
在Module1底下執行:
以下是複製A1:A5到現有儲存格的寫法
Range("A1:A5").Copy ActiveCell
如果是要複製到現有儲存格貼上"值"該如何撰寫呢?
作者:
register313
時間:
2012-4-23 13:09
回復
1#
av8d
ActiveCell.Resize(5, 1) = Range("A1:A5").Value
作者:
av8d
時間:
2012-4-23 13:12
回復 av8d
ActiveCell.Resize(5, 1) = Range("A1:A5").Value
register313 發表於 2012-4-23 13:09
大大~我解開了~但是好像是這樣~如下
Range("A1:A5").Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
以上好像沒辦法再化簡?
作者:
oobird
時間:
2012-4-23 14:37
[a1:a5] = [a1:a5].Value
與二樓是一樣的。二樓是要先把滑鼠放在A1執行。
作者:
samenameboy
時間:
2012-4-27 17:19
回復
3#
av8d
可以省略成這樣:
Range("A1:A5").Copy
Selection.PasteSpecial Paste:=xlPasteValues
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)
