Phương thức AutoFilter (1 người xem)

[khuongvietphong]

Chào các thành viên GPE. Nhờ mọi người giải thích giúp em về lệnh AutoFilter trong VBA với ạ. Cụ thể em muốn hỏi là:

AutoFilter 2 là gì ? AutoFilter 4 là gì ? Và còn AutoFilter mấy nữa... và tác dụng của từng cái AutoFilter ấy ạ. Em đã tìm thử trên GPE

-search rồi mà chưa có tìm thấy để tài nào nói về cái này.

Xin cảm ơn mọi người !

 

[giangleloi]

Chào các thành viên GPE. Nhờ mọi người giải thích giúp em về lệnh AutoFilter trong VBA với ạ. Cụ thể em muốn hỏi là:

AutoFilter 2 là gì ? AutoFilter 4 là gì ? Và còn AutoFilter mấy nữa... và tác dụng của từng cái AutoFilter ấy ạ. Em đã tìm thử trên GPE

-search rồi mà chưa có tìm thấy để tài nào nói về cái này.

Xin cảm ơn mọi người !

Tức là Field ấy Phong (chỉ là số thứ tự thui mà.)

 

[Kiều Mạnh]

Chào các thành viên GPE. Nhờ mọi người giải thích giúp em về lệnh AutoFilter trong VBA với ạ. Cụ thể em muốn hỏi là:

AutoFilter 2 là gì ? AutoFilter 4 là gì ? Và còn AutoFilter mấy nữa... và tác dụng của từng cái AutoFilter ấy ạ. Em đã tìm thử trên GPE

-search rồi mà chưa có tìm thấy để tài nào nói về cái này.

Xin cảm ơn mọi người !

Thì cứ thử từng cái xem 1 là tại sheet , 2 sang sheet khác ...........

 

[hoamattroicoi]

Chào các thành viên GPE. Nhờ mọi người giải thích giúp em về lệnh AutoFilter trong VBA với ạ. Cụ thể em muốn hỏi là:

AutoFilter 2 là gì ? AutoFilter 4 là gì ? Và còn AutoFilter mấy nữa... và tác dụng của từng cái AutoFilter ấy ạ. Em đã tìm thử trên GPE

-search rồi mà chưa có tìm thấy để tài nào nói về cái này.

Xin cảm ơn mọi người !

Bạn gõ Range("Vùng dữ liệu").Autofilter sau đó bấm phím F1 để mở Excel Help. Bạn sẽ thấy số 2 hoặc 4 bạn đề cập trên chính là cột mà bạn muốn lọc. Ví dụ Range("A2:C21").Autofilter 2,"<>A" thì 2 ở đây chính là lọc cột B với điều kiện khác ký tự A

[TABLE="width: 100%"]
[TR]
[TD="align: left"]Range.AutoFilter Method
[/TD]
[/TR]
[/TABLE]

Filters a list using the AutoFilter. Syntax
expression.AutoFilter(Field, Criteria1, Operator, Criteria2, VisibleDropDown)
expression An expression that returns a Range object.
Parameters

Name	Required/Optional	Description

[TH="width: 10%"] Data Type [/TH]

[TD="class: mainsection"] Field [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"]The integer offset of the field on which you want to base the filter (from the left of the list; the leftmost field is field one).[/TD]

[TD="class: mainsection"] Criteria1 [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"]The criteria (a string; for example, "101"). Use "=" to find blank fields, or use "<>" to find nonblank fields. If this argument is omitted, the criteria is All. If Operator is xlTop10Items , Criteria1 specifies the number of items (for example, "10").[/TD]

[TD="class: mainsection"] Operator [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] XlAutoFilterOperator [/TD]
[TD="class: mainsection"]One of the constants of XlAutoFilterOperator specifying the type of filter.[/TD]

[TD="class: mainsection"] Criteria2 [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"]The second criteria (a string). Used with Criteria1 and Operator to construct compound criteria.[/TD]

[TD="class: mainsection"] VisibleDropDown [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"] True to display the AutoFilter drop-down arrow for the filtered field. False to hide the AutoFilter drop-down arrow for the filtered field. True by default.[/TD]

Return Value
Variant
Remarks

If you omit all the arguments, this method simply toggles the display of the AutoFilter drop-down arrows in the specified range.

Example

This example filters a list starting in cell A1 on Sheet1 to display only the entries in which field one is equal to the string "Otis". The drop-down arrow for field one will be hidden.

Visual Basic for Applications
Worksheets("Sheet1").Range("A1").AutoFilter _ field:=1, _ Criteria1:="Otis", _ VisibleDropDown:=False

 

[khuongvietphong]

Hóa ra đơn giản vầy mà em không bít . Cảm hơn các anh chị ạ. À các anh chị cho em hỏi thế còn Advanced Filter 2 thì là gì ạ

 

[hoamattroicoi]

Hóa ra đơn giản vầy mà em không bít . Cảm hơn các anh chị ạ. À các anh chị cho em hỏi thế còn Advanced Filter 2 thì là gì ạ

Gõ Range("Vùng dữ liệu")chấm AdvancedFilter rồi bấm F1 đi bạn, sẽ học được nhiều thứ hơn không chỉ là 1 tham số của mỗi phương thức. Không dịch được tiếng anh thì nhờ Google Translator đi.

[TABLE="width: 100%"]
[TR]
[TD="align: left"]Excel Developer Reference[/TD]
[/TR]
[TR]
[TD="align: left"]Range.AdvancedFilter Method[/TD]
[/TR]
[/TABLE]

Filters or copies data from a list based on a criteria range. If the initial selection is a single cell, that cell's current region is used. Syntax
expression.AdvancedFilter(Action, CriteriaRange, CopyToRange, Unique)
expression A variable that represents a Range object.
Parameters

Name	Required/Optional	Description

[TH="width: 10%"] Data Type [/TH]

[TD="class: mainsection"] Action [/TD]
[TD="class: mainsection"]Required[/TD]
[TD="class: mainsection"] XlFilterAction [/TD]
[TD="class: mainsection"]One of the constants of XlFilterAction specifying whether to make a copy or filter the list in place.[/TD]

[TD="class: mainsection"] CriteriaRange [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"]The criteria range. If this argument is omitted, there are no criteria.[/TD]

[TD="class: mainsection"] CopyToRange [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"]The destination range for the copied rows if Action is xlFilterCopy . Otherwise, this argument is ignored.[/TD]

[TD="class: mainsection"] Unique [/TD]
[TD="class: mainsection"]Optional[/TD]
[TD="class: mainsection"] Variant [/TD]
[TD="class: mainsection"] True to filter unique records only. False to filter all records that meet the criteria. The default value is False .[/TD]

Return Value
Variant
Example

This example filters a database (named "Database") based on a criteria range named "Criteria."

Visual Basic for Applications
Range("Database").AdvancedFilter _ Action:=xlFilterInPlace, _ CriteriaRange:=Range("Criteria")

 

[khuongvietphong]

Bạn gõ Range("Vùng dữ liệu").Autofilter sau đó bấm phím F1 để mở Excel Help. Bạn sẽ thấy số 2 hoặc 4 bạn đề cập trên chính là cột mà bạn muốn lọc. Ví dụ Range("A2:C21").Autofilter 2,"<>A" thì 2 ở đây chính là lọc cột B với điều kiện khác ký tự A

Em đang dùng bản Crack nên không được Excel hỗ trợ

 

[khuongvietphong]

Em hiểu rồi , tức là nó có 2 loại AdvancedFilter xlFilterInPlace cái này nó tương đương với AdvancedFilter 1 (nhưng ko cần viết số 1) tức là lọc

ngay tại chỗ còn AdvancedFilter xlFilterCopy thì tương đương với Advanced Filter 2 tức là lọc rồi Copy sang chổ khác

 

[hoamattroicoi]

Em đang dùng bản C**** nên không được Excel hỗ trợ

Bạn xóa cái chữ Cờ Cờ ở bài viết trên đi nhé, cảm ơn.

Nên dùng chức năng Help của Excel, bạn sẽ học được nhiều thứ hơn người khác học đấy.

Chúc bạn sớm giỏi VBA

 

[comet_1701]

Em hiểu rồi , tức là nó có 2 loại AdvancedFilter xlFilterInPlace cái này nó tương đương với AdvancedFilter 1 (nhưng ko cần viết số 1) tức là lọc

ngay tại chỗ còn AdvancedFilter xlFilterCopy thì tương đương với Advanced Filter 2 tức là lọc rồi Copy sang chổ khác

Xin lỗi, tác giả KhuongVietPhong viết đúng, minh quen 2 và 1 rồi nên bị lộn

 

[doveandrose]

Bạn xóa cái chữ Cờ Cờ ở bài viết trên đi nhé, cảm ơn.

Nên dùng chức năng Help của Excel, bạn sẽ học được nhiều thứ hơn người khác học đấy.

Chúc bạn sớm giỏi VBA

chưa được nữ cao thủ xinh đẹp soi đường sao giỏi VBA được đây ?
cái tham số Unique trong phương thức AdvancedFilter dùng sao vậy bạn hoamattroicoi xinh đẹp ơi ? mình xem trong hướng dẫn mà chưa hiểu được . hic

 

[Kiều Mạnh]

Chả biết nó thế nào chứ....xài nó thì nó lọc ra danh sách duy nhất...như Dic ....như Removed Duplicates vậy.... kakaka

Nhưng có một vài từ nó ngu luôn ko hiểu gì hết
VD:
Viettel 10
Viettel 100
Viettel 1000
Nó hiểu là một

 

[hoamattroicoi]

chưa được nữ cao thủ xinh đẹp soi đường sao giỏi VBA được đây ?
cái tham số Unique trong phương thức AdvancedFilter dùng sao vậy bạn hoamattroicoi xinh đẹp ơi ? mình xem trong hướng dẫn mà chưa hiểu được . hic

Người đẹp doveandrose ơi, đọc bài #7 của mình đi, hoặc Record macro là có ngay đoạn code đó à. Tham số Unique người đẹp khai báo là TRUE thì sẽ là lọc duy nhất nhé. Nếu muốn lọc sang sheet khác thì người đẹp nhớ đứng ở sheet kết quả rùi thực hiện Advanced Filter và khai báo các tham số cho nó.
Ví dụ này là đứng ở sheet hiện hành tiến hành lọc duy nhất dữ liệu ở Sheet 2 nè.

Sub Vidu()
    Sheets("Sheet2").Range("A1:A5").AdvancedFilter Action:=xlFilterCopy, _
        CopyToRange:=Range("B1"), Unique:=True
End Sub

 

[Ngoai Thanh]

Theo tôi thì anh chàng quyến rũ DoveAndRose đang đùa đấy...anh ấy hỏi cơ để chọc hoamattroi thôi...haha

P/s: đồ quỹ sứ cái anh DoveAnhRose ah...

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!