Hỏi về "Tự Động SortBy"????

[nhucuong195]

Các bạn cho mình hỏi về việc sort by trong excel... Mình muốn khi mình đánh danh sách giá lên. Thì giá cao nhất sẽ "Tự ĐỘng" Nhảy lên trên cùng. Khi nhập giá xong nhé. Vì sếp mình muốn như thế chứ không cần nhấn nút sortby.

 

[nghiaphuc]

Các bạn cho mình hỏi về việc sort by trong excel... Mình muốn khi mình đánh danh sách giá lên. Thì giá cao nhất sẽ "Tự ĐỘng" Nhảy lên trên cùng. Khi nhập giá xong nhé. Vì sếp mình muốn như thế chứ không cần nhấn nút sortby.

Giả sử dữ liệu nằm tại cột A. Bạn sử dụng code sau (có thể tùy biến cho phù hợp với thực tế):

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target.Row > 1 Then
        Range([A1], [A65536].End(xlUp)).Sort key1:=[A1], order1:=xlDescending, Header:=xlYes
    End If
End Sub

 

[nhucuong195]

Giả sử dữ liệu nằm tại cột A. Bạn sử dụng code sau (có thể tùy biến cho phù hợp với thực tế):

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target.Row > 1 Then
        Range([A1], [A65536].End(xlUp)).Sort key1:=[A1], order1:=xlDescending, Header:=xlYes
    End If
End Sub

Mình đã thử rồi bạn à... Nhưng nó cứ hiện lỗi không thể chạy bạn ơi

 

[nhucuong195]

Bạn ơi bạn giúp mình set cái bảng này cho nó tự động cập nhật được không?] Cụ thể là bảng E

 

[ndu96081631]

Giả sử dữ liệu nằm tại cột A. Bạn sử dụng code sau (có thể tùy biến cho phù hợp với thực tế):

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target.Row > 1 Then
        Range([A1], [A65536].End(xlUp)).Sort key1:=[A1], order1:=xlDescending, Header:=xlYes
    End If
End Sub

Mấy trò sort tự động này tốt nhất đừng dùng sự kiện Change nghiaphuc à!
Thử tưởng tượng dữ liệu 3 cột và ta sort cột C ---> Mới gõ dữ liệu ở cột C, chưa kịp làm gì ở 2 cột A, B thì nó đã "chạy" mất tiêu rồi, biết đâu mà tìm
Tóm lại: Chỉ nên dùng Sub ---> Nhập liệu xong, nhần nút 1 cái để sort cũng chưa muộn!
Mà cũng hơi thắc mắc: Chỉ việc vào menu Data\Sort (hoặc bấm nút Sort trên thanh công cụ) bộ tốn công sức lắm sao mà phải tự động hả trời?

 

[nhucuong195]

nhưng sếp muốn thế ... Chiều ý mấy ông sếp là như thế đó (

 

[ndu96081631]

nhưng sếp muốn thế ... Chiều ý mấy ông sếp là như thế đó (

Cái này cũng chẳng khó khăn gì! Bạn có biết trong Excel có chức năng Record macro không? (Trong menu Tools\Macro\Record New Macro hoặc bấm tổ họp phím Alt + M + R)
- Bật chức năng record macro lên, OK 1 phát
- Chứ thao tác sort bình thường bằng tay trên dữ liệu của bạn
- Xong việc, tắt chức năng record macro --> Vậy là bạn đã có code do Excel ghi lại (như 1 máy thu băng)
- Từ giờ, muốn dùng code đã thu, chỉ cần Alt + F8, chọn tên Macro rồi Enter là xong
- Có thể vẽ 1 nút nhấn, Click phải nó, chọn Assign Macro, chỉ đến tên Macro đã ghi ---> Từ giờ, cứ nhấn nút là code chạy