Điền ký tự * vào những ô trống. (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

emgaingayngo

Thành viên hoạt động
Tham gia
9/2/07
Bài viết
141
Được thích
5
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).
 

File đính kèm

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).
Mời bạn xem file đính kèm. Kết quả ở sheet3. Tôi dùng công thức.
 

File đính kèm

Lần chỉnh sửa cuối:
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)
Và code rất ngắn gọn (thay vì phải For... Next)
PHP:
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
 

File đính kèm

Web KT

Bài viết mới nhất

Back
Top Bottom