在 Excel 中的多个工作表中输入相同的公式以遵循顺序

在 Excel 中的多个工作表中输入相同的公式以遵循顺序

我需要在 Excel 中输入相同的 Excel 公式,以便它按顺序继续。因此sheet 1需要有='Booking Sheet'!F1Sheet 2 ='Booking Sheet'!F2,依此类推。

有没有办法可以做到这一点而不用将其分别输入到每个工作表中,因为有 40 张工作表并且我必须对每张工作表中的大约 75 个单元格执行此操作。

有人告诉我要按住Ctrl按钮,突出显示所有工作表并输入,但它并不按照顺序进行。

答案1

您可以使用此宏。它将遍历所有命名的表格delivery并输入一个公式,A1该公式将为每次交付提供不同的F编号。所以

工作表Delivery 1 A1将有一个公式='Booking Sheet'F1

工作表Delivery 2 A1将有公式 =Booking Sheet'F2

等等

Sub EnterFormulas()

    Dim ws As Worksheet
    For Each ws In Sheets
        If InStr(1, ws.Name, "Delivery", vbTextCompare) Then
            ws.Range("A1").Formula = "='Booking Sheet'!F" & Split(ws.Name, Chr(32))(1)
        End If
    Next

End Sub

答案2

抱歉,我发帖说我恋尸癖,但我在寻找类似的东西时偶然发现了这个。有一个更优雅的答案,我会在这里记录下来。

据推测,每张交货单都会从预订单上的列表中提取数据,因此有连续的“预订单”!F1..F2..等等

最简单的方法是给予每张交货单一个唯一的参考,我猜是从 1 到 40 的序列号。还可以使用该参考作为预订表上的列表的索引。

然后在交货单上使用查找公式,查找预订列表以查找相关数据。这样您就可以在每张表上使用相同的公式。

如果您熟悉宏,则只需要一张交货单作为模板,而不是 40 张。然后,宏会逐行逐行地填写交货单,输出交货单的 PDF 文件,然后对每次交货重复此操作

相关内容