Mình có thử làm cái testfill, từ cái tip chèn row của anh Thanh, mình muốn điền dữ liệu vào những ô đó mà chạy k được, mn xem giúp với nhé.
Sub testfill() Dim i As Integer Dim ii As Long ii = Cells(2, 1).Row For i = 2 To 24 If Cells(ii, 1).Row - ii = 3 Then Cells(ii, 1).Value = "plan" End If Next i End Sub https://facebook.com/569100319856001_931633270269369
em sửa bài viết, mô tả thêm lỗi đi
e bầm run mà nó không báo lỗi j cả, cũng như k có kết quả j cả, e cũng có thử vài cách nhưng mà nó fill hết lun chứ k như mong đợi, @@
nhìn code là cũng đủ hiểu, dòng ii = Cells(2, 1).Row là quá thừa, vì gán bằng 2 luôn cho lẹ, mắc mớ gì làm vậy, thứ 2 trong vòng for thị bạn for i và trong khi các lệnh lại thực hiện trên ii, vậy cũng như ko
Cái vòng for của i mà nội dung bên trong không dính gì tới i
thôi cái này làm excel dể hơn, viết VBA khó quá @@
Cứ tâm lý đó sẽ khó tiến bộ
