標題: 關於copy至另一工作頁 [打印本頁]

---

作者: eric093    時間: 2014-1-30 13:03     標題: 關於copy至另一工作頁

請教：
先在其它工作頁上執行所需要的資料篩選後，複制，再選其它工作頁貼上，原則上都可正常執行，
但是，若在執行巨集前，滑鼠若在訂單工作頁上點在某一儲存格就無法執行，若是以滑鼠全選整個工作頁的話，就可以正常執行，請問應該怎麼排除！
ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible).EntireRow.Copy
Sheets("訂單").Select
Selection.PasteSpecial

---

作者: zxcxz    時間: 2014-1-30 14:26

因為entire row 不能在column A以後位置貼上
加返select A1 cell即可

ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible).EntireRow.Copy
Sheets("訂單").Select
Activesheet.range("A1").select
Selection.PasteSpecial

---

作者: eric093    時間: 2014-1-30 14:33

感謝解救！

---

作者: GBKEE    時間: 2014-1-31 08:45

回復 1# eric093

1. ).EntireRow.Copy  '整列,或 整欄複製

複製代碼

所貼上的儲存格(點)必須是列或欄,的第一個 Cell (才符合整列,或整欄的範圍)

---

作者: eric093    時間: 2014-2-2 19:18

回復 4# GBKEE

感謝版大！了解了！

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)