Tag: filter

基于实体最大值的Excelfilter: 我有大量的logging，看起来像这样： Name Value E 10 A 2 D 4 E 10 A 5 B 3 B 10 D 10 C 4 我试图根据以下逻辑过滤这个表格：select最大值不大于5的那些names所有logging。基于上面的例子，我将select名字A和C的所有logging，因为它们的最大值分别是5和3： Name Value A 2 A 5 C 4 B，D和E将被排除，因为它们的最大值是10（每个）。有没有办法与透视表做到这一点？如果使用数据透视表是不可能的，有没有办法使用公式来做到这一点，而不会恢复到VBA？我知道如何创build一个MAXIF UDF，并在过滤中使用它，但我现在正试图避免这种情况。

Excel-VBA：检查列filter中select了多less个项目（或限制select）: 我需要控制Excel工作表上一列的简单自动filter 。经过研究，似乎没有任何特定的事件发生，当这样一个filter被改变。所以这里想到的唯一事件就是.Calculate事件，但我不确定这里是否可靠。作为替代方法，是否有一种方法可以统计特定筛选器中已select了多less项？在我的情况下，我只需要捕获如果在filter（但不是全部）中select了多个项目。既然看来我不能阻止或者限制这个，那么我至less会显示一个警告信息。有人可以帮我弄这个吗？我的过滤数据： Worksheets(1).Range("$C$1:$C$100").AutoFilter Field:=1 提前谢谢了，麦克风

VBA Excel FileDialog设置/重置filter: 我有一个macros，要求用户select多个文件进行数据分析。用户首先selectExcel或CSV文件（XLSX，XLS，CSV），然后请求第二个文件但仅CSV。该工具的目的是将两个数据文件合并为一个。在一个Sub中，我要求用户使用FileDialog代码select任何兼容的XLSX，XLS或CSV文件： Dim myObj As Object Dim myDirString As String Set myObj = Application.FileDialog(msoFileDialogFilePicker) With myObj .InitialFileName = "C:\Users\" & Environ$("Username") & "\Desktop" .Filters.Add "Custom Excel Files", "*.xlsx, *.csv, *.xls" .FilterIndex = 1 If .Show = False Then MsgBox "Please select Excel file.", vbExclamation: Exit Sub myDirString = .SelectedItems(1) End With 它似乎适当地过滤：完成此数据分析后，用户运行第二个子select另一个文件，但它只能是一个CSV文件。 […]

筛选并复制多个Excel表中的某些行到另一个: 我正在使用具有各种工作表的工作簿。我想要复制最后5张纸张“J”中的值为“Pending”的所有行。我想要创build一个名为“Pending week”的新标签并粘贴所有这些行。任何帮助将非常感激。谢谢

AutoFilter基于一个数组，超过3个元素: 编辑：我的variables包含通配符。我在网上看到，如果我使用通配符，自动filter只能包含两个条件。这是真的？如果是这样，这可能是我的问题。不幸的。结束编辑我正在尝试过滤我的数据，以显示数据是否包含数组中的六个项目之一。元素是stringvariables。我的工作代码是： With ActiveSheet .Columns("J").AutoFilter Field:=1, Criteria1:=Array(d3, d2), _ Operator:=xlFilterValues End With 这背后的想法是为了我想要完成的。但是，我真的想要6个元素的数组，而不仅仅是两个。不幸的是，当我尝试添加所有六个元素时，什么也没有显示出来。 With ActiveSheet .Columns("J").AutoFilter Field:=1, Criteria1:=Array(d3, d2, d1, d21, d11, d31), Operator:=xlFilterValues End With 我没有得到一个错误或任何东西。只是没有出现。有谁知道如何解决这个问题？我已经testing了与数组中的两个元素的string（d1，d21等）的各种组合的代码，他们都按预期工作，所以问题不是与variables。

Excel VBA从表中删除filter: 我正在尝试创build一个macros，它将创build一个表，然后删除标题行中的filter。为了澄清，我想filter本身根除，完全从表中删除。在其他线程看，很难辨别是否人们只是想要他们的filter说“全选”，或者他们是否希望filter本身删除..我想filter自己走了。任何帮助，将不胜感激！我不是最大的VBA，似乎也无法在Google上find任何使用Excel类似的野心的人。

按月份和年份过滤excel电子表格: 所以我需要find每年每个月的最高价格和最低价格。 Sub Anaylze() Dim datemonthcount As Long Dim dateyearcount As Long Dim yearcount As Long Dim month As Long Dim yearstart As Long Dim maxprice As Long Dim minprice As Long Dim rowprice As Long Dim percentchange Dim counterlong As Integer rowprice = 1 yearstart = 2002 counterlong = 0 Range("A1").Select Do Until IsEmpty(ActiveCell) Or […]

VBA Excel如何在复制行时维护filter: 所以我得到了一行关联的filter（每个这些单元格上有一个箭头，当你点击它们时，出现允许用户过滤特定内容的filter框）。但是我有一个小问题，这是我用来从一张纸复制一行到另一张的代码： Sheets(Name).Range("A1").EntireRow.Copy Destination:= _ Sheets("Monthly").Range("A1").End(xlUp).Offset(Sheets("Monthly").UsedRange.rows.Count – 1) Cells.EntireColumn.AutoFit 问题是，当这个代码复制行时，他们失去了他们的filter属性。有没有办法保存这些信息？

在Excel VBA中的自动filter: 我有一个很大的电子表格数据，我试图用自动filter进行过滤。我有两个autofilter语句，当我同时运行它们时，不返回任何数据（我知道这是一个错误）。但是，当我分别运行它们时，它们工作正常。我不确定是什么导致这个问题。任何帮助将不胜感激。每个“rng”是被过滤的特定列。 rng3.AutoFilter 1, Criteria1:=Array( _ "CMS Part D (CY " & Year(Date) & ")", "Commercial", "State Medicaid"), Operator:= _ xlFilterValues rng4.AutoFilter Field:=1, Criteria1:="No"