Question

我有一个工作簿，其中包含大量工作表，并且我正在尝试构建一个自动搜索功能，以检查所有工作表中的值。基本上，我希望有一个单元格，比方说O2，在每张图纸上返回A2的值，其中A1的前15个字符与活动图纸上的A1匹配。这些来自A2的值希望采用列表形式，以逗号分隔。
在这里的任何输入将不胜感激。谢谢。

Answer 1

这是您可能会开始使用的一些伪代码或大纲。它采用VBA子例程的形式。开始对其进行编码，如果遇到问题，请用Google搜索问题并自行解决。（或粘贴您的代码并寻求帮助）。

dim AnsSheet as string
AnsSheet = "xxx"
For S# = 0 to S#max - 1
    if S#.name = AnsSheet, then bypass
    if S#.Cells(A1).first15char = AnsSheet.Cells(A1).first15char then
        AnsSheet.Cells(O2) = AnsSheet.Cells(O2) & ", " & S#.Cells(A2)
    endif
Next S#
AnsSheet.Cells(O2) strip off leading ", " from the first result

值匹配时返回工作表编号

1 个答案: