将文本从excel中的一个工作表拉到另一个工作表的公式（不是数字）

Question

我有一个电子表格，其中包含每个研究位置的标签。工作表上有一个部分有几列。其中三列如下：1列出了行动项目（文本）1列出了负责人（文本），1列出了截止日期（日期字段）。同一“表”中的行表示类别。在许多情况下，只有一个或两个类别的行动项目，或者某些行动项目根本没有。

我想查询代表研究网站的每个标签，并将任何操作项目，责任方和日期提取到另一个标签上，以便我们可以在一个位置查看所有网站的所有操作项目回顾。

我认为某种IF或VLOOKUP功能可能有效，或某种数据透视表，但因为它是文本而不是数字，我很难制定适当的公式。我还被告知我可以进行某种参考查找（比如在我想要查找的任何文本的开头添加像ACTION这样的单词），但这似乎比它需要的更复杂。

任何帮助都将深表感谢。

Answer 1

我不认为VLOOKUP可以解决您的问题。你肯定需要VBA，所以这样的事情会让你前进。制作一个名为Summary的新工作表，并将此代码放在工作表中：

Sub SummarizeSheets()
Dim ws As Worksheet

Application.ScreenUpdating = False
Sheets("Summary").Activate
 Range("A2").Select
 For Each ws In Worksheets
    If ws.Name <> "Summary" Then
     If ws.Range("A2") <> "" Then 'A2 is blank means no action items found so go to next worksheet
      ws.Range("A2:C100000").Copy 'Adjust your range here
      ActiveSheet.Paste Range("A65536").End(xlUp).Offset(2, 0)' Paste the copied range
    End If
     End If
Next ws
Application.CutCopyMode = False
End Sub

您必须调整代码以满足您的需求。这里的假设是你的行动项目从单元格A2开始，负责人和截止日期分别在单元格B2和C2中。