emgaingayngo
Thành viên hoạt động
- Tham gia
- 9/2/07
- Bài viết
- 141
- Được thích
- 5
Mời bạn xem file đính kèm. Kết quả ở sheet3. Tôi dùng công thức.Mong GPE giúp tôi đoạn code để hoàn thành tác vụ sau :
Tại những dòng có chữ Start hoặc End thì để trống, những dòng còn lại thì điền ký tự hoa thị (*) vào ô trống (theo mẫu ở sheet2). Hiện tại là 64 dòng và 18 cột (Số dòng và cột có thể thay đổi).
Tôi đề xuất phương pháp AutoFilter ---> Chính vậy cần có cột tiêu đều (thêm vào)Mong GPE giúp tôi đoạn code để hoàn thành tác vụ sau :
Tại những dòng có chữ Start hoặc End thì để trống, những dòng còn lại thì điền ký tự hoa thị (*) vào ô trống (theo mẫu ở sheet2). Hiện tại là 64 dòng và 18 cột (Số dòng và cột có thể thay đổi).
Sub DienKT()
With Range([A1], [A65536].End(xlUp)).Resize(, 18)
.AutoFilter 1, "<>Start", xlAnd, "<>End"
.SpecialCells(12).SpecialCells(4).Value = "*"
.AutoFilter
End With
End Sub
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2