thầy cho e hỏi dòng code này sao bị lỗi
Sub dl_offset()
Range("A1:A5").Copy
Range("B1:B5").Paste
End Sub
Option Explicit
Sub copydulieu()
Sheet1.Range("A1:C7").Copy
Sheet1.Range("E1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Câu lệnh paste thường không viết như vậy, mà viết dạng:
- Bước 1: chọn 1 ô / vùng ô
- Bước 2: lệnh dán là TenSheet.Paste
Ví dụ như code của bạn thì viết là:
Sub copy_paste()
Range("A1:A5").Copy
Range("B1").Select
ActiveSheet.Paste
End Sub