从一张纸到另一张的公式答案

【问题标题】：Formula from one sheet to another从一张纸到另一张的公式
【发布时间】：2019-07-04 23:08:49
【问题描述】：

我有一本带有两张纸的 Excel 书表 1：包含以列表形式显示的日期，然后是包含 A-L 值的表格 Sheet2 ：包含一个表格，其中包含日期和序列号以及每个列的值。

查询：我正在从表 1 到表 2 执行 Hlookup，以从表 2 中获取值。我成功了。

我不想手动复制粘贴Hlookup 公式。因为我有一个包含 200 行的数据集。

我还在编写一个公式来显示表 2 中的值（如果可用），如果不只是保持表 1 的值...

我已经写出了公式。我需要一种方法来自动更新工作表 1 中每个单元格值中的公式。

更多信息请参阅附件。我附上了一个虚拟数据集。

实际公式如下：

IF(HLOOKUP(C3,'Pec-29'!D3:$X$94,3,0)="","Desk 46",(HLOOKUP(C3,'Pec-29'!D3:$X$94,3,0)))

我有一个 3-235 的索引... 我不想一个一个粘贴这个

【问题讨论】：

能否请edit your question 提供示例数据和预期结果（不要只是链接到工作表）。如果需要，您可以将屏幕截图上传到imgur.com 并在此处链接到它们
也许使用 row(3:3) 而不是 3，那么当您向下复制行时它会改变？如果公式从第 3 行开始，或者只是 row()？或者可能不使用美元，只处理“Pec-29”中的每一行，例如D3:X3 ?
顺便说一句，在撰写本文时，我们找不到附件。

【解决方案1】：

如果您的目标是在不将公式复制到其他单元格的情况下执行此操作，那么唯一的解决方案是构建一个循环所有行并执行与公式相同的操作的宏。下面是一个 VBA 宏程序的通用示例，使用 ALT+F11 打开 VBA 编辑器。希望对您有所帮助。

Sub test()
    rng = ActiveSheet.Range("D7:D23")
    For Each cl In rng
        ' do something with this row
    Next cl
End Sub

【讨论】：