Tag: 过滤

在Excel中，不pipe是过滤还是sorting，在前x行上进行条件格式化

我试图find一种方法来轻松识别表列中的前十行，而不pipe它如何被sorting/过滤。 有没有办法使用条件格式来突出显示这些单元格？ 期望的结果的例子… 样本数据： product price units code Item02 15.97 2191 7UQC Item05 12.95 1523 TAAI Item13 9.49 1410 LV9E Item01 5.69 591 6DOY Item04 15.97 554 ZCN2 Item08 10.68 451 2GN0 Item03 13.95 411 FP6A Item07 25.45 174 PEWK Item09 14.99 157 B5S4 Item06 18 152 XJ4G Item10 11.45 148 BY8M Item11 16.99 66 […]

在Excel中进行dynamicsearch和过滤

目前我正在使用Excel进行dynamicsearch和过滤。 我find了一个很好的教程，使用了一个表格和Active-X文本框。 我重新创build了它，当然它的工作原理。 然而，我的问题是它只考虑一列。 现在，我已经创build了另一个表格和另一个search栏，认为它会工作得很好，但是，由于某种原因，它没有。 这是问题：数据集看起来像这样; 在“addr1”中search包含“1”的单元格（正常工作）： 在“addr2”中search包含“1”的单元格（不起作用）： 我曾尝试设置格式为文本，一般，数字等，但似乎没有任何影响。 第二个search应该列出包含“123”的单元格，但是不包含。 表中的VBA代码： Private Sub TextBox1_Change() ActiveSheet.ListObjects("address1").Range.AutoFilter Field:=1, Criteria1:="*" & [A1] & "*", Operator:=xlFilterValues End Sub Private Sub TextBox2_Change() ActiveSheet.ListObjects("address2").Range.AutoFilter Field:=1, Criteria1:="*" & [B1] & "*", Operator:=xlFilterValues End Sub 任何人有任何解决办法？ 我的示例文件可以在这里find： https : //www.dropbox.com/s/b4hpsczrhjbe2is/searchbar.xlsm?dl=0 感谢您的任何反馈！

过滤后，VBAselect可见的单元格

以下代码应用filter，并在将某些filter应用于表后，select列B中的前10个项目。 我一直在使用这个许多不同的过滤select，但我遇到了我的一个filter组合的问题。 我发现当过滤后B列中只有一个项目时，它不会复制该单元格 – 而是复制整行，看起来是一个奇怪的select。 当我手动添加一个项目到这个filter（共2），然后它复制它罚款。 只有一个项目时，为什么这个代码不工作的任何想法？ Sub top10() Dim r As Range, rC As Range Dim j As Long 'Drinks top 10 Worksheets("OLD_Master").Columns("A:H").Select Selection.sort Key1:=Range("H1"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Worksheets("OLD_Master").Range("A:H").AutoFilter Field:=4, Criteria1:=Array( _ "CMI*"), Operator:= _ xlFilterValues Worksheets("OLD_Master").Range("A:H").AutoFilter Field:=5, Criteria1:="Drinks" Set r = Nothing Set rC = Nothing j = […]

VBA在合并文件之前清除filter

我正在通过VBA开发一个电子表格自动化过程，并且迄今为止已经取得了成功，但是我还是陷入了一个单一的元素，即在复制之前清除filter。 这个代码位于一个主文件的模块中，它的function是打开一个文件夹中的每个工作簿（每个文件都有一个表），将所有数据从A2复制到AJ（但是有很多行），粘贴到masterfile，然后closures文件并移动到文件夹中的下一个文件夹，直到所有文件都被合并到主文件中，一个数据块直接在前一个文件的下面。 它完美的作品。 问题是，在某些情况下，这些文件可能已经过滤了列，并且过滤掉的所有内容都不会被复制。 这些文件是从另一个部门发送的。 我做了search，并find了不同的方法来清除filter，我甚至尝试了一个自己的代码，但我不能让他们工作在我的代码由于某种原因，也许我把他们在一个错误的地方或什么？ 另外，有什么我应该改变清理/优化代码？ 感谢您的时间和关注！ Option Explicit Sub ExcelMerge() Dim wbkReports As Workbook Dim mergeObj As Object, dirObj As Object, filesObj As Object, everyObj As Object Application.ScreenUpdating = False Application.Calculation = xlCalculationManual Set mergeObj = CreateObject("Scripting.FileSystemObject") Set dirObj = mergeObj.Getfolder("C:\Users\Report") Set filesObj = dirObj.Files For Each everyObj In filesObj Set wbkReports = […]

删除Excel中巨大的数据表中只有一些行的function？

我需要你的帮助来解决我在Excel 2016中遇到的这个问题（英文）。 我有很多数据，结构如下： code_red value_1 code_green value_2 code_green value_3 code_green value_4 code_green value_5 code_blue value_6 我需要使用一个函数来让我得到： code_red value_1 code_green value_2 code_green value_5 code_blue value_6 我尝试Remove duplicate但我需要保持重复最后一行。 此外 ，我还需要在我的数据中使用相同的原则，所以假设我有以下情况： code_black value_101 code_green value_102 code_green value_103 code_green value_104 code_yellow value_105 我需要能够获得： code_black value_101 code_green value_102 code_green value_104 code_yellow value_105 请记住，我有一个超过2000行的表，所以我不能每次都手动完成，这就是为什么我需要一个函数/macros来做到这一点。 希望你能帮助我这个！

为每个filter结果创build一个单独的excel文件

我有一个电子表格，我想拆分为每个部门分开的电子表格，有更多的部门显示，我希望每个.xls文件保存与部门名称 部门领域是专栏D. 即我想每个.xls文件只有部门1，部门2，等等的logging。 不幸的是，我无法发布电子表格的屏幕截图，因为我的代表还不够好。 我会用什么VBA代码来做到这一点？

在input单元格的同时进行筛选

这将有可能根据我input的单元格的值dynamic筛选行？ 假设我有一个数据列A10:A1000的列范围，并且我在A1单元格中input的标准上过滤了该范围。 我希望filter在运行时dynamic地作出反应，而不是在我敲击[Enter]之后。 我用文本框find了一个解决scheme。 http://www.vbforums.com/showthread.php?647621-Excel-filtering-while-typing 不过，最好是，我想在不是在某个文本框中input单元格。 可能吗？

Excel VBA AutoFilter问题（字段值）

我无法find解决我的代码问题。 假设我有这个logging集 AR1 AR2 AR7 AR8 AR9 2015-02-28 Residential Pool ND,5 BDM IT0538700021972 2015-02-28 Residential Pool ND,5 BDM IT0538700021972 2015-02-28 Residential Pool ND,5 BDM IT0538700021972 2015-02-28 Residential Pool ND,6 BDM IT0538700021972 自动filter应该在AR7列中查找ND，5（这是第3列） 这是直到AR代码不再是结果的代码。 正如您在logging集中看到的那样，没有AR3，AR4，AR5和AR6列。 因此，代码中的FilterField I对于AR1代码是1，对于AR2代码是2，对于AR7代码是3（对7）。 所以代码返回一个错误，因为自动筛选范围中没有第7列。 但是真正的问题在于，即使在该范围内存在第7列，结果也将是零或错误，因为自动filter将在第7列而不是第3列进行search。 Sub LookFor_ND5() '——— Dim FilterField (the number of the column). ' ActiveCell.Value comes from another workbook and […]

过滤Excel表格的独特集合

我有一个excel表，看起来像这样： Row Name 1 uniqueName001_vid1.mpg 2 uniqueName001.mpg 3 uniqueName002_vid1.mpg 4 uniqueName002_vid2.mpg 5 uniqueName002.mpg 我想弄清楚如何识别和标记（给一个唯一的ID）在表中包含相同的唯一名称集。 例如，行1和行2将是一组，而行3,4和5将是另一组。 我的理想结果是这样的： Row Name UID 1 uniqueName001_vid1.mpg SET1 2 uniqueName001.mpg SET1 3 uniqueName002_vid1.mpg SET2 4 uniqueName002_vid2.mpg SET2 5 uniqueName002.mpg SET2 我可以在Excel中运行SQL查询，如果这是比Excel公式更好的select。 任何build议，非常感谢！

Excel中date过滤的问题

我正在从FRED的Excel数据集上运行高级筛选器。 我一直试图过滤数据，只包括一月，四月，七月和十月的数据（每季度的第一个月）。 如果我使用特定date的标准（例如1/1/1995）运行高级筛选器，结果将按预期返回。 但是，只要我使用任何特殊的search字符（例如1 / ，1 / / *， 1995或1/1 / ????），我就不会得到任何结果。 我已经阅读了excel文档，并在互联网上search解决scheme，但似乎没有人遇到这个问题。 理想情况下，我想要做的就是search所有这些月份，同时排除其他所有内容（如1 *或2 *或3 *或4 *）首先我需要弄清楚的是为什么我似乎无法进行过滤工作期间。 我猜这个问题跟excel如何对待date有关。 最初的date格式是DD-MM-YYYY，但我意识到Excel正在处理它们，就好像它们是MD-YYYY格式一样，所以我改变了数据以反映这一点。 我尝试将date转换为常规文本以避免这种情况，但是Excel将它们转换为看起来像“4/1/1995”的数字。 请记住，我是过滤新手，所以我可能犯了一个菜鸟的错误。 数据和标准样本 （filter不适用） observation_date FEDFUNDS 1* observation_date FEDFUNDS 1/1/1995 5.53 2/1/1995 5.92 3/1/1995 5.98 4/1/1995 6.05 5/1/1995 6.01 6/1/1995 6.00 7/1/1995 5.85 8/1/1995 5.74