Excel:如果单元格包含值,则将行复制到新选项卡

Excel:如果单元格包含值,则将行复制到新选项卡,excel,excel-formula,excel-2010,vba,Excel,Excel Formula,Excel 2010,Vba,说到Excel,我是一个完全的新手,我在谷歌上搜索过它,它给出了一些我一点也不理解的回答。其中大部分是我需要在Visual Basic中执行的操作 基本上,我想要的是为单个用户设置几个选项卡,这些选项卡是从主选项卡生成的。所有这些都已经设置好了 因此,如果主表上的R行没有(人员姓名首字母) 将此行复制到Nick选项卡(每个用户将有20多行,不确定这是否会改变任何内容) 任何帮助都将是难以置信的,非常感谢 谢谢, 尼克你可以从录制宏开始。这里有一个关于如何做到这一点的链接:。单击“录制”后,只需开

说到Excel,我是一个完全的新手,我在谷歌上搜索过它,它给出了一些我一点也不理解的回答。其中大部分是我需要在Visual Basic中执行的操作

基本上,我想要的是为单个用户设置几个选项卡,这些选项卡是从主选项卡生成的。所有这些都已经设置好了

因此,如果主表上的R行没有(人员姓名首字母) 将此行复制到Nick选项卡(每个用户将有20多行,不确定这是否会改变任何内容)

任何帮助都将是难以置信的,非常感谢

谢谢,
尼克

你可以从录制宏开始。这里有一个关于如何做到这一点的链接:。单击“录制”后,只需开始手动执行所需的操作。这将向您展示一些语法。在这种情况下,您可能最容易将摘要数据格式化为表格,按每个人的姓名首字母对其进行过滤,然后将结果复制到各个选项卡。您录制的代码可能如下所示:

Sub CopyNO()
ActiveSheet.ListObjects("Table1").Range.AutoFilter Field:=1, Criteria1:= _
    "NO"
Range("Table1[#All]").Select
Selection.Copy
Sheets("NO").Select
Range("A2").Select
ActiveSheet.Paste
End Sub
为了清理您记录的代码,您需要尝试将任何显示ActiveSheet的内容更改为类似Sheets(“SheetName”)的内容,理想情况下,通过使用实际对选择所做的任何操作来删除任何.Select命令。在这里,您可能会得到如下结果:

Sub CopyNO()
Sheets("Summary").ListObjects("Table1").Range.AutoFilter Field:=1, Criteria1:= _
    "NO"
Worksheets("Summary").Range("Table1").Copy _
   Destination:=Worksheets("NO").Range("A5")
End Sub

你知道如何用Excel VBA写宏吗?嗨,我以前从未用Excel写过宏。