Range (" A1: D11 "). Select
Selection. The AutoFilter
Selection. The AutoFilter Field:=3, Criteria1:="& gt; 10 ", the Operator:=xlAnd
Selection. The AutoFilter Field:=4, Criteria1:="& gt; 40 ", the Operator:=xlAnd

Excel macro how to convert BCB ole code, and how to obtain the filter, the mailbox 2076874465 @qq.com, trouble