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

对于Excel来说，我是一个完全新手，我已经谷歌search，并提出了一些我不明白的反应。 其中大部分是我需要在Visual Basic中做的事情？

基本上我想要的是为个人用户设置几个标签，从主标签生成。 所有这些都已经build立起来了。

所以如果主表上的R行没有（人名缩写）将这一行复制到Nick标签（每个用户将有20+行，不知道是否改变了任何内容）

任何帮助将是令人难以置信的和大规模赞赏！

谢谢，尼克

Answer 1

你可以通过录制一个macros来开始。 下面是如何做到这一点的链接： http : //office.microsoft.com/en-us/excel-help/create-or-delete-a-macro-HP010342374.aspx#BMrecordmacro 。 点击logging后，开始做手动完成的工作。 这将显示一些语法。 在这种情况下，将摘要数据格式化为表格可能是最简单的，按每个人的姓名首字母进行过滤，然后将结果复制到单个选项卡。 你logging的代码可能看起来像这样：

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 

要清理你logging的代码，你需要尝试改变任何说ActiveSheet的东西像Sheets（“SheetName”），理想情况下，摆脱任何.Select命令，而不是使用实际做的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