麻辣家族討論版版 » Excel程式區 » 關於copy至另一工作頁

返回列表下一主題上一主題發帖

關於copy至另一工作頁

中學生 Rank: 2

帖子: 77
主題: 30
精華: 0
積分: 110
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 台北
註冊時間: 2013-7-14
最後登錄: 2018-10-3

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2014-1-30 13:03 | 只看該作者

關於copy至另一工作頁

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

樓主熱帖

收藏

新人一枚

中學生 Rank: 2

帖子: 34
主題: 14
精華: 0
積分: 61
點名: 0
作業系統: Winxp
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2014-1-25
最後登錄: 2019-3-4

2^#

發表於 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

中學生 Rank: 2

帖子: 77
主題: 30
精華: 0
積分: 110
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 台北
註冊時間: 2013-7-14
最後登錄: 2018-10-3

3^#

發表於 2014-1-30 14:33 | 只看該作者

感謝解救！

新人一枚

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

4^#

發表於 2014-1-31 08:45 | 只看該作者

回復 1# eric093

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

複製代碼

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

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 77
主題: 30
精華: 0
積分: 110
點名: 0
作業系統: win7
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 台北
註冊時間: 2013-7-14
最後登錄: 2018-10-3

5^#

發表於 2014-2-2 19:18 | 只看該作者

回復 4# GBKEE

感謝版大！了解了！

新人一枚

靜思自在 : 盡多少本份，就得多少本事。

返回列表下一主題上一主題