Tạo phím tắt tự động cho thao tác

[sudden_death]

Em có một bảng số liệu. Và do nó có rất nhiều nên em sử dụng bộ lọc filter để lọc những dữ liệu. Tuy nhiên khi lọc dữ liệu thì việc phải mở ra bảng custom Autofilter để lọc nhiều lần rất mất thời gian Em muốn tạo một phím tắt nhanh để mở bảng custom Autofilter. Em đã thử tạo một macro nhưng không được. Các anh giúp em cái.(số liệu nhiều quá)

Còn đây là file của em: http://www.box.net/shared/3bdqb9yxr7
​

 

[cadafi]

Excel 2007: tại cột cần Custom AutoFilter, Ấn tổ hợp phí Atl+mũi tên xuống, sau đó ấn phím F hai lần.
Excel 2003: tại cột cần Custom AutoFilter, Ấn tổ hợp phí Atl+mũi tên xuống, sau đó ấn phím mũi tên xuống hai lần.

 

[sudden_death]

Có phím tắt gì đơn giản hơn không anh? Ví dụ như ctrl+shift+e chẳng hạn??? Cảm ơn anh ca_dafi nhiều!

 

[ndu96081631]

Có phím tắt gì đơn giản hơn không anh? Ví dụ như ctrl+shift+e chẳng hạn??? Cảm ơn anh ca_dafi nhiều!

Theo tôi thì nên viết 1 code dựa vào sự kiện change ---> Bạn gõ 1 từ nào đó vào 1 cell, nó sẽ tự động AutoFilter
Ví dụ:
- Bạn insert ít nhất 2 dòng trống phía trên
- Chọn cell B1 làm cell gõ từ cần tìm
- Dán code này vào sheet:

Private Sub Worksheet_Change(ByVal Target As Range)
  Application.ScreenUpdating = False
  If Target.Address = "$B$1" Then
    With Range("A4").CurrentRegion
      .AutoFilter 2, IIf(Target = "", "<>", "*" & Target & "*")
    End With
  End If
End Sub

Xem file đính kèm (tôi đã xóa bớt dử liệu )

 

[sudden_death]

Cảm ơn ndu96081631 Làm thế rất nhanh.

 

[sudden_death]

Em đã làm theo cách của ndu96081631 và kết quả rất tốt. Tuy nhiên còn mộttt vấn đề:

Đó là: Em muốn lọc dữ liệu 2 lần. Tại cột B thì theo cách của anh ndu96081631 . Em muốn làm thêm tại cột H để lọc thêm một lần nữa dữ liệu. Tuy nhiên việc lọc 2 cột ko đồng nhất và việc đánh tên nước tại cột H trở nên rất bất tiện . Nên em muốn khi đánh một chữ cái đầu của tên nước vào ô H1, thì có một danh sách sổ xuống để mình chọn tên nước. Mong các anh giúp đỡ.

Đây là file của Em: http://www.box.net/shared/q7y8hhtsvt

 

[ndu96081631]

Em đã làm theo cách của ndu96081631 và kết quả rất tốt. Tuy nhiên còn mộttt vấn đề:

Đó là: Em muốn lọc dữ liệu 2 lần. Tại cột B thì theo cách của anh ndu96081631 . Em muốn làm thêm tại cột H để lọc thêm một lần nữa dữ liệu. Tuy nhiên việc lọc 2 cột ko đồng nhất và việc đánh tên nước tại cột H trở nên rất bất tiện . Nên em muốn khi đánh một chữ cái đầu của tên nước vào ô H1, thì có một danh sách sổ xuống để mình chọn tên nước. Mong các anh giúp đỡ.

Đây là file của Em: http://www.box.net/shared/q7y8hhtsvt

Bạn có thể sửa lại code như sau:

Private Sub Worksheet_Change(ByVal Target As Range)
  Application.ScreenUpdating = False
  With Range("A3").CurrentRegion
    If Target.Address = "$B$1" Then
      .AutoFilter 2, IIf(Target = "", "<>", "*" & Target & "*")
    ElseIf Target.Address = "$H$1" Then
      .AutoFilter 8, IIf(Target = "", "<>", Target & "*")
    End If
  End With
End Sub

Với code này, bạn cũng không cần làm list xổ xuống tại H1 làm gì cho mất công, cứ gõ 1 vài ký tự tên nước mà bạn nhớ vào H1 là được rồi ---> Ví dụ Australia bạn có thể gõ là Au
(lần sau khi đưa dử liệu lên bạn nhớ xóa bớt, chừa lại vài trăm dòng là đủ rồi ---> Nén file lại là có thể gữi lên diển đàn)

 

[sudden_death]

Cảm ơn Anh ndu96081631. Chạy rất tốt ạ. Đợt này em phải xử lý nhiều số liệu quá nên...may nhờ các Anh. Cảm ơn các anh lần nữa!

 

[ndu96081631]

Cảm ơn Anh ndu96081631. Chạy rất tốt ạ. Đợt này em phải xử lý nhiều số liệu quá nên...may nhờ các Anh. Cảm ơn các anh lần nữa!

Nếu lọc nhiều điều kiện hơn nữa bạn hãy nghiên cứu Advanced Filter thử xem ---> Hãy làm bằng tay, nếu thành công thì record nó thành 1 macro để chạy tự động!

 

[thivantan]

Gửi Anh ndu96081631. Em muốn nhờ Anh sửa code để lấy dữ liệu với điều kiện Giá thành nhỏ hơn một giá trị nào đó ( Ô B2) được không ạ?. Khi ta gõ một giá trị bất kỳ vào ô B2 thì sẽ có dữ liệu về các giá trị nhỏ hơn giá trị ô B2. Cảm ơn anh đã cho em học hỏi được rất nhiều vấn đề cơ bản về EXCEL.

 

[ndu96081631]

Gửi Anh ndu96081631. Em muốn nhờ Anh sửa code để lấy dữ liệu với điều kiện Giá thành nhỏ hơn một giá trị nào đó ( Ô B2) được không ạ?. Khi ta gõ một giá trị bất kỳ vào ô B2 thì sẽ có dữ liệu về các giá trị nhỏ hơn giá trị ô B2. Cảm ơn anh đã cho em học hỏi được rất nhiều vấn đề cơ bản về EXCEL.

Bạn đưa file lên đi, còn không thì xem ví dụ trong file đính kèm và tùy biến theo ý nhé
(Bấm Alt + F11 vào sửa lại code nếu dử liệu thật không giống với ví dụ)

 

[hon7643]

Phím tắt để chạy code Sort tự động.

Để chạy code Sort tự động, việc đầu tiên là phải chọn vùng muốn sort, mình muốn có 1 phím tắt hay 1 công cụ nào đó mà nó tự chọn vùng muốn sort và chạy code đó luôn, các bạn giúp mình nhé! Cảm ơn nhiều

 

[hon7643]

xin xóa bài này để chuyển