https//drivegooglecom/drive/folderHiện em đang thực hiện thao tác copy từ worksheet

Mình xem file thấy các code đều chạy bình thường. Ko rõ bạn gặp lỗi ở code nào?

Ở Sub dưới đây mình thấy cách viết này chưa đúng:

Sub Fillout_DL()
   Dim dongcuoi_data As Long
   dongcuoi_data = Sheets("Data").Range("A" & Rows.Count).End(xlUp).Row
   Range("F2:L2" & dongcuoi_data).FillDown
   Range("F2:L2" & dongcuoi_data).Copy
   Range("F2:L2" & dongcuoi_data).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub

Khi viết biết dongcuoi_data rồi thì tọa độ vùng range phải viết là:

Range("F2:L" & dongcuoi_data)

ngoài ra bạn có thể thay lệnh copy-paste bằng lệnh:

Range("F2:L" & dongcuoi_data).Value = Range("F2:L" & dongcuoi_data).Value

Việc copy paste sẽ khiến file chạy chậm hơn và tốn bộ nhớ xử lý hơn.

Ở câu code này e hiện lỗi ntn ạ. File này khi chạy ở các máy khác câu code này đều chạy được nhưng máy em báo lỗi như trên ạ. Thầy giải đáp và hướng dẫn xử lý giúp em với ạ.

Lỗi do tên workbook bị thiếu phần loại file (.xlsm hay .xlsx)

Bạn cần viết tên workbook chính xác so với tên trong cửa sổ Project của VBA.

Thường khi viết code liên quan tới workbooks thì bạn nên gán biến cho các đối tượng này trước, sau đó trong khi viết lệnh lấy dữ liệu thì viết theo dạng tên biến sẽ dễ hơn, ít bị lỗi hơn.

Phần này mình có hướng dẫn cách làm trong chương 8 và chương 10, bạn có thể xem lại nhé.

Thầy cho em hỏi các nút bấm khi thao tác em có 1 thao tác xóa dòng dẫn đến các nút bấm bị xô lệch. Thầy cho em hỏi có cách nào khắc phục được vđê đó không a. vì em có chuyển nút sang 1 sheet khác nhưng khi thao tác các lệch chỉ hoạt động trên sheet có nút bấm chứ không hiện trên sheet đúng như code vba.

Chào bạn bạn phải chỉnh code cho phù hợp bạn nhé.  còn khi bạn để code vba thì phải chuẩn về các vị trí cột và dòng nhé.

mỗi code em đều chỉnh đích danh tên sheet và các range nhưng vẫn bị hiện tượng đó ah. Nhờ thầy xem file giúp em a.

https://drive.google.com/drive/folder...

Chào bạn phần sub gop_dulieu_redash đã có phần workbook chưa Redash.xlsx trong code mình chưa thấy bạn mở ra để tìm dòng cuối bạn lại trong chương 10 nhé