返回列表 上一主題 發帖

[發問] 把指定資料複製到不同的分頁的最後一列下面

感謝 owen06大大提供好方法
可不可以把"工作表2"從  B2  B3開始貼
因為小弟的A欄是日期

再次感謝幫忙
~~~~~~~~~~~~~
Sub 巨集1()
Sheets("工作表1").Select
Sheets("工作表1").Range("A2:B2").Copy
Sheets("工作表2").Select
Sheets("工作表2").[a65536].End(3).Offset(1, 0).PasteSpecial xlPasteValues
End Sub
~~~~~~~~~~~~~~~~~
學習 學習 一直學習

TOP

        靜思自在 : 並非有錢魷是快樂,問心無愧心最安。
返回列表 上一主題