Excel 我需要创建一个公式,如果一列中有一个值,相同值的整行将被复制到另一个表中

Excel 我需要创建一个公式,如果一列中有一个值,相同值的整行将被复制到另一个表中,excel,vba,formula,Excel,Vba,Formula,我一直在不同的论坛和帮助页面上到处寻找帮助,但我对脚本、宏和vba等领域完全是新手。。。基本上我有一张表,上面有我们公司的所有产品,包括:;产品名称、成本、零售价格、数量和小计。我希望能够创建复制数量列大于0的整行的功能。基本上,我们会输入客户想要的东西,包括数量,在另一张纸上,它将是客户订购的东西的浓缩版本,而不是他们没有订购的东西。这样,我们就可以打印出这张表,并将其交给我们的生产/订购部门,而不是让他们滚动excel,查看他们想要和不想要的所有产品 这太复杂了吗?任何帮助都将不胜感激 谢谢

我一直在不同的论坛和帮助页面上到处寻找帮助,但我对脚本、宏和vba等领域完全是新手。。。基本上我有一张表,上面有我们公司的所有产品,包括:;产品名称、成本、零售价格、数量和小计。我希望能够创建复制数量列大于0的整行的功能。基本上,我们会输入客户想要的东西,包括数量,在另一张纸上,它将是客户订购的东西的浓缩版本,而不是他们没有订购的东西。这样,我们就可以打印出这张表,并将其交给我们的生产/订购部门,而不是让他们滚动excel,查看他们想要和不想要的所有产品

这太复杂了吗?任何帮助都将不胜感激

谢谢你


桑德拉

我在这里回答了一个几乎相同的问题:


希望您可以根据需要调整解决方案。

您的问题不需要vba代码。您可以再添加一列,比如“客户订单”。然后你把它填满,过滤掉不是空的单元格。弗拉卢库普公式也可以做到这一点

但如果您想使用代码,我会这样做:

  • 在另一张表格中,您应该在第一行创建标题,如产品、价格、数量等
  • 产品标题下的一行是产品列表(使用数据验证)
  • 此行中的其他单元格应具有vlookup公式,以查找有关所选产品的信息
  • 还有一个按钮,其功能是复制行中的内容并将其粘贴到您想要的位置(在此列表下方、另一页中等),下面是此类宏的示例:

    Range("A2:C2").Select
    Selection.copy
    
    Rows("4:4").Select
    Selection.Insert Shift:=xlDown
    
    Range("A4").Select
    Selection.PasteSpecial Paste:=xlPasteValues