autofilter

问题 I have an auto-filtered range of data. The auto filter was created by the following VB code: Sub Colour_filter() Range("A4").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Selection.AutoFilter End Sub I would like to sort the values in column "A" (the data actually start from cell "A4") by the following colour ( Color = RGB

问题 I have an auto-filtered range of data. The auto filter was created by the following VB code: Sub Colour_filter() Range("A4").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Selection.AutoFilter End Sub I would like to sort the values in column "A" (the data actually start from cell "A4") by the following colour ( Color = RGB

问题 I have an auto-filtered range of data. The auto filter was created by the following VB code: Sub Colour_filter() Range("A4").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Selection.AutoFilter End Sub I would like to sort the values in column "A" (the data actually start from cell "A4") by the following colour ( Color = RGB

问题 I would like to open Excel from Access and apply filters to a sheet. Below is my code: Dim s as String Set oApp = CreateObject("Excel.Application") oApp.Wworkbooks.Open FileName:="dudel.xlsm" oApp.Visible = True s = "AB" With oApp .Rows("2:2").Select .Selection.AutoFilter .ActiveSheet.Range("$A$2:$D$9000").AutoFilter Field:=3, Criteria1:= _ Array(s, "E", "="), Operator:=xlFilterValues .Range("A3").Select End With When I ran the code, I got this error: runt time error 1004 Autofilter methond

问题 This is a question that sometimes arises (e.g.: see here and here) and has almost always been given solutions based on some looping (with AutoFilter() itself or arrays) For some reason Excel developers limited AutoFilter custom array criteria functioning to a maximum of two, so the following would not work: filterNotCriteria = Array("<>A","<>B","<>C") someRange.AutoFilter field:=1, Criteria1:=filterNotCriteria, Operator:=xlFilterValues While I think it'd be really helpful to have this

问题 Background While I was trying to solve a problem for another user I ran into, seemingly, a local issue. Imagine some very simple sample data (being true date-time values): | DateTimeVals | |----------------| | 1-1-2019 01:00 | | 2-1-2019 01:00 | | 3-1-2019 01:00 | | 4-1-2019 01:00 | | 5-1-2019 01:00 | It doesn't need to be more complicated to show you the issue at hand. Let's imagine we would want to filter on 3-1-2019 01:00 (3rd of Jan). Simply using: Range("A1").AutoFilter Field:=1,

问题 ActiveSheet.Range("a1:b1").AutoFilter the above code works fine but sometimes gives error 'autofilter method of range class failed'. my intention is to enable filtering for some columns without any criteria. is there any better way? 回答1: As a rule I always turn off all prior filters, just in case. ActiveSheet.AutoFilterMode = False 'turn off prior filters ActiveSheet.Range("A1:B1").AutoFilter 'turn on new clean filter 来源： https://stackoverflow.com/questions/14827833/autofilter-method-of-range

问题 [Back story] I have a Google Sheet I use for emailing schedules to subcontractors. Each subcontractor has their own sheet, and I also have one last sheet called MasterSchedule. The master schedule uses references to all the individual sheets such that all subcontractor schedules are visible. This is reaaaaaal long though. So I included a helper column in all sheets that simply returns true or false indicating whether a row should be displayed or not on the master. However the row is still

问题 I've been using a line like: Cells.AutoFilter 11, "0" for a while to autofilter column 11 for "0". I recently updated to Microsoft Office 2013 and now I'm getting an AutoFilter method of Range class failed runtime error with this line. Is this a compatibility issue with Office 2013 or some other problem? EDIT: I should clarify that I am not getting an error with a program I already run, but rather a line which I've used before and is not working for me right now. EDIT2: Code: Dim firstRow As

问题 I have the below code, In L1 I want to select all dates except for yesterday and today and in M1 unselect all. I able to do the same in M1 but unable to perform the action in L1. Range("L1").Select ActiveSheet.Range("$A$1:$U$3804").AutoFilter Field:=12, Operator:= _ xlFilterValues, Criteria2:=Array(1, "2/11/2016", 1, "3/31/2016", 2, "4/5/2016", 2, _ "4/6/2016", 2, "4/7/2016", 2, "4/8/2016", 2, "4/11/2016", 2, "4/12/2016", 2, "4/13/2016", _ 2, "4/14/2016", 2, "4/15/2016", 2, "4/18/2016", 2, "4