2013-01-09 75 views
0

我想通過使用AHK將我的文本從Excel中複製並存儲到剪貼板。複製並存儲到剪貼板

這是我的代碼:

Xl.Range("A1").Copy 
Xl.Range("A2").Copy 
Xl.Range("A3").Copy 
Xl.Range("A4").Copy 

如何存儲A1-A4到剪貼板?然後我可以手動粘貼剪貼板。

+0

在時刻你只能選擇一個單元格。你需要使用「A1:A4」 – Sam

+0

你爲什麼要涉及剪貼板?如果您想要做的只是移動這些數據,還有其他方法。 – Brad

+0

請有關此問題的上下文的更多信息 – whytheq

回答

1
Dim wsSource As Worksheet, wsDest As Worksheet 
Dim rngSource As Range, rngDest As Range 
Set wsSource = ActiveSheet 'or whatever 
Set wsDest = wsSource ' or whatever 
Set rngSource = wsSource.Range("A1:A4") 
Set rngDest = wsDest.Range("C1") 
rngSource.Copy rngDest 

除非你真的想它是在剪貼板上,爲用戶用戶隨時隨地貼他們可以選擇,那麼你個ELAST線更改爲rngSource.Copy

+0

+1看起來不錯 - 雖然不容易回答這樣一個模糊的問題 – whytheq

+0

非常感謝你 –