Chỉ giúp phần còn thiếu trong file (1 người xem)

[Tran Mui]

Rất mong GPE chỉ giúp tôi trong file đính kèm không kẻ hết được khung trong bảng tính
và không thể sửa Names ( yêu cầu ghi trong file)
Cám ơn

 

[leonguyenz]

Rất mong GPE chỉ giúp tôi trong file đính kèm không kẻ hết được khung trong bảng tính
và không thể sửa Names ( yêu cầu ghi trong file)
Cám ơn

Mình kiểm tra file bình thường, kẻ khung hay sửa Name bình thường.

 

[Tran Mui]

Trên máy của mình vẫn không thể nào làm được
Xin leonguyenz làm giúp xong gửi filr lại mình xem có được không

 

[viehoai]

Trên máy của mình vẫn không thể nào làm được
Xin leonguyenz làm giúp xong gửi filr lại mình xem có được không

Sửa bình thường có sao đâu
Nhưng bạn đừng sử dụng sự kiện Worksheet_SelectionChange() màn hình giật khó chịu

 

[Tran Mui]

VietHoai ơi khi đổi Names xong, chọn một lớp bất kỳ nào đõ thì Names này lại trở lại như cũ
Mình đang cần, mong được giúp
Xin cám ơn

 

[ndu96081631]

VietHoai ơi khi đổi Names xong, chọn một lớp bất kỳ nào đõ thì Names này lại trở lại như cũ
Mình đang cần, mong được giúp
Xin cám ơn

Thế bạn cần cái name ấy để làm giống gì? Quan trọng là ở code thôi

 

[Tran Mui]

ndu ơi trong file ấy mình không kẻ được , mình nghĩ có thể do Name chỉ chọn đến K6 nên không kẻ được, mà phải đến m6
đấy là lý do mình muốn
Xin được ndu chỉ giúp nhé

 

[viehoai]

ndu ơi trong file ấy mình không kẻ được , mình nghĩ có thể do Name chỉ chọn đến K6 nên không kẻ được, mà phải đến m6
đấy là lý do mình muốn
Xin được ndu chỉ giúp nhé

Bạn xem lại file thử nhé

 

[ndu96081631]

ndu ơi trong file ấy mình không kẻ được , mình nghĩ có thể do Name chỉ chọn đến K6 nên không kẻ được, mà phải đến m6
đấy là lý do mình muốn
Xin được ndu chỉ giúp nhé

Bạn nên nhớ rằng lọc bằng Advanced Filter thì nguồn thế nào, đích sẽ thế nấy. Tức là: Nguồn có kẻ khung thì đích có kẻ khung
Trong file của bạn thì:
- Nguồn dữ liệu tại sheet danhsach_in, cột L chưa kẻ khung bên phải
- Code của bạn

Sheet1.Range(Sheet1.[A6], Sheet1.[A10000].End(xlUp)).Resize(, 15).AdvancedFilter xlFilterCopy, [M1:M2], [COLOR=#ff0000][A6:k6][/COLOR]

Bạn chỉ lọc đến A6:K6 thôi thì làm sao bắt nó kẻ khung cột L và cột M?
Sửa lại:
- Tại sheet danhsach_in, kẻ khung cho cột L
- Tại sheet chọn lớp, copy L6 paste vào M6
- Code sửa lại:

Sheet1.Range(Sheet1.[A6], Sheet1.[A10000].End(xlUp)).Resize(, 15).AdvancedFilter xlFilterCopy, [M1:M2], [COLOR=#ff0000][A6:M6][/COLOR]

Xong!

 

[Tran Mui]

Mình đã hiểu thêm nhiều
Xin cám ơn các bạn
Năm mới xin chúc các bạn Sức khỏe và thành đạt