標題:
[發問]
不連續資料的選取與輸出
[打印本頁]
作者:
巴克斯
時間:
2013-10-14 12:17
標題:
不連續資料的選取與輸出
本帖最後由 巴克斯 於 2013-10-14 12:19 編輯
[attach]16330[/attach]
如圖,想於輸入位置選取不連續資料後,希望執行巨集後將選取資料逐一列在輸出的位置
目前實際結果是列出選取區域的第一筆下連續區域資料
非我想要的不連續資料,請問應該如何達成呢?
謝謝
Sub nn()
Range("輸出").ClearContents
For i = 1 To Selection.Count
Range("輸出")(i) = Selection(i)
Next
End Sub
複製代碼
[attach]16331[/attach]
作者:
owen06
時間:
2013-10-14 12:45
回復
1#
巴克斯
請問這樣符合需求嗎？
Sub nn()
Range("輸出").ClearContents
Selection.Copy [E3]
End Sub
複製代碼
作者:
oobird
時間:
2013-10-14 12:49
For Each c In Selection
[e65536].End(3)(2) = c.Value
Next
複製代碼
作者:
巴克斯
時間:
2013-10-14 17:33
回復 巴克斯
請問這樣符合需求嗎？
owen06 發表於 2013-10-14 12:45
感謝回覆,想不到這樣就解決了:victory:
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)
