返回列表 上一主題 發帖

關於copy至另一工作頁

zxcxz

帖子
34 
主題
14 
精華
0 
積分
61 
點名
0  
作業系統
Winxp 
軟體版本
Office 2010 
閱讀權限
20 
性別
男 
註冊時間
2014-1-25 
最後登錄
2019-3-4 
1# 跳轉到 »
發表於 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

TOP

        靜思自在 : 做好事不能少我一人，做壞事不能多我一人。
返回列表 上一主題