Nhờ sửa lỗi runtime 1004 liên quan đến Range và cells.

[Dang Le Khanh Ninh]

For j = 1 To Column_Draft
If j = 1 Then
If 0 < Sheets("Draft").Cells(2, j).Value < Lotsize Then Sheets("Draft").Cells(3, j).Value = 0
If Sheets("Draft").Cells(2, j).Value >= Lotsize Then Sheets("Draft").Cells(3, j).Value = Application.RoundDown(Sheets("Draft").Cells(2, j).Value / Lotsize, 0) * Lotsize
End If
If j > 1 And j < End_column And Sheets("Draft").Cells(2, j).Value > 0 Then
Total_old1 = Application.Sum(Sheets("Draft").Range("3:3"))
Total_new1 = Application.Sum(Sheets("Draft").Range(Cells(2, 1), Cells(2, j)))
Sheets("Draft").Cells(3, j).Value = Int((Total_new1 - Total_old1) / Lotsize) * Lotsize
End If
If j > 1 And j = End_column And Sheets("Draft").Cells(2, j).Value > 0 Then
Total_old2 = Application.Sum(Sheets("Draft").Range("3:3"))
Sheets("Draft").Cells(3, j).Value = QtyDay + QtyEndDate + QtyStartDate - Total_old2
End If
Next j

For j = 1 To Column_Draft
Sheets("Pro Finishing").Cells(Row_Paste, Column_Std + j - 1).Value = Sheets("Draft").Cells(3, j).Value
Next j
End If

 

[ptm0412]

Bạn cần chứng minh rằng #5 'làm hư' chủ bài đăng dùm tôi 1 cái nha; Bạn có thời hạn 24 giờ để cân nhắc chuyện này!

Nguyên văn ở đâu đó: "Mọi lỗi dù nhẹ như lông mao cũng phải bị trừng hay phạt".
Lỗi của tác giả gồm 2 lỗi: viết code không bỏ trong cặp tag [_code ], và lỗi khóa file. Cả 2 lỗi nhỏ, nhẹ như lông mao, nhưng chỉ nhắc nhở và đã tiếp thu. Hết hư rồi nhé.
Bài 5: Hỗ trợ tác giả chuyển code vào trong cặp dấu tag. Không thấy trừng, không thấy phạt, mà lại hỗ trợ. Chả lẽ không sinh hư?
Bài 6: Thấy file khóa mà vẫn hứng chí muốn trả lời. Chả lẽ không sinh hư?

 

[SA_DQ]

Tùy thôi, sao cũng đặng./.

 

[HieuCD]

Nguyên văn ở đâu đó: "Mọi lỗi dù nhẹ như lông mao cũng phải bị trừng hay phạt".
Lỗi của tác giả gồm 2 lỗi: viết code không bỏ trong cặp tag [_code ], và lỗi khóa file. Cả 2 lỗi nhỏ, nhẹ như lông mao, nhưng chỉ nhắc nhở và đã tiếp thu. Hết hư rồi nhé.
Bài 5: Hỗ trợ tác giả chuyển code vào trong cặp dấu tag. Không thấy trừng, không thấy phạt, mà lại hỗ trợ. Chả lẽ không sinh hư?
Bài 6: Thấy file khóa mà vẫn hứng chí muốn trả lời. Chả lẽ không sinh hư?

Nghe như âm vang từ chùa Thiếu lâm, "Thiền" thấm nhuần vào GPE

 

[Dang Le Khanh Ninh]

Còn sau bài này của bạn thì sao, có thay file khác ở bài #1 hay không?

Anh/Chị chỉ giúp em cách sửa lại bài đăng với ạ. Em chưa biết cách sửa lại nội dung và đăng lại file đính kèm ạ. hic. Em cảm ơn!

 

[cantl]

Anh/Chị chỉ giúp em cách sửa lại bài đăng với ạ. Em chưa biết cách sửa lại nội dung và đăng lại file đính kèm ạ. hic. Em cảm ơn!

Bài 1 có edit (hiệu lực dưới 1 năm) nếu không có thì chọn report. Bạn ghi vào: mod ơi giúp em sửa bài với ạ.
Thiếu hiểu biết + nhiệt tình thì chỉ giúp được thế thôi. Tùy cơ ứng biến nhé.

 

[Maika8008]

Anh/Chị chỉ giúp em cách sửa lại bài đăng với ạ. Em chưa biết cách sửa lại nội dung và đăng lại file đính kèm ạ. hic. Em cảm ơn!

Cấp hạng thành viên của bạn chưa được phép sửa bài #1. Muốn update gì thì thêm vào các bài bên dưới.