- 帖子
- 49
- 主題
- 15
- 精華
- 0
- 積分
- 92
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office2001
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2012-4-10
- 最後登錄
- 2024-8-9
|
感謝 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
~~~~~~~~~~~~~~~~~ |
|