返回列表 上一主題 發帖

從一個Workbook抄寫資料到另一個Workbook

何不乾脆用usedrange
  1. Sub test()
  2. With Sheets(1)
  3. .UsedRange.Copy Workbooks("A.xls").Sheets(1).Range("A1")
  4. End With
  5. End Sub
複製代碼

TOP

        靜思自在 : 信心、毅力、勇氣三者具備,則天下沒有做不成的事。
返回列表 上一主題